Написание файлов .xlsx с условными путями к файлам

Question

Я хочу манипулировать различными CSV-файлами через цикл и список. Работает нормально, но я для вывода, я должен создать много файлов .xlsx, и файлы должны быть названы в соответствии со значением определенной переменной.

Я уже пытался передать функцию write_xlsx с условием ifelse, например:

for (i in 1:length(files)) {
files[[i]] %>% 
write_xlsx(files[[i]], paste(ifelse(x="test1", "/Reportings/test1.xlsx", 
ifelse(x="test2", "/Reportings/test2.xlsx", "test3")
}

Я ожидаю, что в папке Reportings будет создано несколько файлов .xlsx.

Answer 1

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

В соответствии с тем, что ваш список состоит из матрицы, что x является переменной, и чтооно всегда имеет одинаковое значение.

df=data.frame(x=rep("test1",3),y=rep("test1",3))
df2=data.frame(x=rep("test2",3),y=rep("test2",3))

files=list(df,df2)
files[[1]]$x[1]

for(i in 1:length(files)){
write.xlsx(files[[i]],paste0("Reportings/",files[[i]]$x[1],".xlsx"))
}