将列表中的所有数据框保存到单独的 .csv 文件中

Question

我有一个数据框列表，我想将其保存到独立的 .csv 文件中。

目前我为每个数据框都有一个新行：

write.csv(lst$df1, "C:/Users/.../df1")
write.csv(lst$df2, "C:/Users/.../df2")
ad nauseam

显然这并不理想：名称的更改意味着检查每个案例并进行更新。我考虑过使用类似的东西

lapply(lst, f(x) write.csv(x, "C:/Users/.../x") 

但这显然行不通。如何将列表中的每个数据框保存为单独的 .csv 文件？

Answer 1

你可以这样做：

N <- names(lst)
for (i in seq_along(N)) write.csv(lst[[i]], file=paste0("C:/Users/.../"), N[i], ".csv")

根据 Heroka 的评论，有一个简短的版本：

for (df in names(lst)) write.csv(lst[[df]], file=paste0("C:/Users/.../"), df, ".csv")

或者

lapply(names(lst), function(df) write.csv(lst[[df]], file=paste0("C:/Users/.../"), df, ".csv") )