在 R 中将数据导出为 CSV

Question

我已经合并了一堆 csv 文件，但无法将它们正确导出到一个文件我做错了什么？数据显示在我的控制台中，但我收到一条错误消息，显示“as.data.frame 中的错误。默认（x[[i]]，可选 = TRUE）： 不能将类 ""function"" 强制转换为 data.fram"，

setwd("c:/users/adam/documents/r data/NBA/DK/TEMP")
filenames <- list.files("c:/users/adam/documents/r data/NBA/DK/TEMP")
do.call("rbind",lapply(filenames, read.csv, header = TRUE))

write.csv(read.csv, file ='Lineups.csv')

Answer 1

您没有将 do.call 函数的结果分配给任何东西。相当常见的 R noob 错误。未能理解函数式编程范式。结果需要分配给 R 名称，否则它们只会被垃圾收集。

错误实际上来自您没有放入代码块中的代码：

write.csv(read.csv, file ='Lineups.csv')

'read.csv' 可能是您对do.call-操作结果的预期名称，但默认情况下它是函数名称而不是您的期望。您可以将do.call-results 分配给名称“read.csv”，但这样做是非常糟糕的做法。选择一个更具描述性的名称，例如“TEMP_files_appended”。

TEMP_files_appended <- do.call("rbind",lapply(filenames, read.csv, header = TRUE))

write.csv(TEMP_files_appended, file ='Lineups.csv')

（我会发现不需要使用header=TRUE 来代替read.csv，因为这是该函数的默认设置。）