library(fs)

path(LETTERS, ext = letters)
#> A.a B.a C.a D.a E.a F.a G.a H.a I.a J.a K.a L.a M.a N.a O.a P.a Q.a R.a S.a T.a 
#> U.a V.a W.a X.a Y.a Z.a

purrr::map2_vec(LETTERS, letters,
                \(LETTER, letter) path(LETTER, ext = letter))
#> A.a B.b C.c D.d E.e F.f G.g H.h I.i J.j K.k L.l M.m N.n O.o P.p Q.q R.r S.s T.t 
#> U.u V.v W.w X.x Y.y Z.z