在列表中写入每个数据帧的CSV

Question

我需要为大型列表中的每个数据框保存单独的.csv文件

    file <- split(x, x$Advertiser)

我的尝试如下......

    for(i in file){
          write.csv(file[[i]],paste(names(file)[i]))
    }

但是，我收到以下错误，这似乎表明您无法将write.csv应用于列表。

Error in file[i] : invalid subscript type 'list'

是否有适当的方法来实现这一目标？

Answer 1

也许这适合你：

lapply(seq_along(myFile), function(i) {
    write.csv(myFile[[i]],
              file = paste0(names(myFile[i]), ".csv"),row.names = FALSE)
})