добавить переменную в функцию glob2rx в r

Question

Я хочу получить выражение и затем поместить его в функцию glob2rx, например:

glob2rx("*A*cfs*")
glob2rx("*B*cfs*")
glob2rx("*C*cfs*")
glob2rx("*D*cfs*")

, потому что я хочу использовать это выражение для вывода списка файлов в папке, например:

list.files(pattern=glob2rx("*A*cfs*"))

Я хочу добавить вектор вроде: (циклически перебирая df)

 df <- c("A","B","C","D")
 ef <- paste0("\"","*",df[i],"*","cfs","*")
 list.files(pattern=glob2rx(ef))

Но это не сработало.

Не могли бы вы дать мне несколько подсказок?

Answer 1

Вы не закрываете с \".Когда вы зацикливаетесь, вы можете использовать

path <- getwd()
df <- c("A","B","C","D")
for(i in 1:length(df)){
  ef <- paste0("*",df[i],"*","cfs","*")
  list.files(path=path,glob2rx(pattern=ef))
}