在R中将数据框列表保存为独立CSV时返回NULL的修改方案

你的代码返回NULL是因为write.csv()函数本身的返回值就是NULL，lapply会收集每个迭代的返回值，所以最终得到NULL列表，但这并不代表文件没生成——真正的核心问题是文件名获取逻辑错误，导致生成的文件名不符合预期（甚至可能是无效的.csv空名称）。

错误原因 #

原代码中names(group_eg_split[i])的写法有误：group_eg_split[i]是一个长度为1的子列表，而非单个元素，无法正确提取对应名称。正确的写法应该是取列表名称向量的第i个元素：names(group_eg_split)[i]。

修改后的代码 #

方式1：修正原索引逻辑

lapply(1:length(group_eg_split), function(i) {
  write.csv(group_eg_split[[i]], 
            file = paste0(names(group_eg_split)[i], ".csv"),
            row.names = FALSE)
})

方式2：更优雅的遍历（推荐）

直接遍历列表的名称，同时获取对应元素，彻底避免索引错误：

lapply(names(group_eg_split), function(name) {
  write.csv(group_eg_split[[name]], 
            file = paste0(name, ".csv"),
            row.names = FALSE)
})

或者用Map函数，更直观地配对名称与元素：

Map(function(df, name) {
  write.csv(df, file = paste0(name, ".csv"), row.names = FALSE)
}, group_eg_split, names(group_eg_split))

验证 #

执行修改后的代码后，工作目录下会生成output_1.csv、output_2.csv、output_3.csv等对应名称的CSV文件，每个文件对应列表中的一个数据框。

内容的提问来源于stack exchange，提问作者jo_