Question

我正在尝试使用以下代码导入和合并一组csv文件，但它似乎没有传递by = c（＆＃34; X＆＃34;，＆＃34; Y＆＃34;）合并函数的参数。有关如何解决此问题的任何建议？谢谢

csvfiles <- list.files(path = ".", pattern='bbg_.*\\.csv$')
csvfiles <- paste("fx/",csvfiles,sep="")
csvfiles

my.df <- do.call("merge",list(lapply(csvfiles, read.csv, header = TRUE), by=c("date","fx_code")))

Answer 1

merge不接受超过2个data.frames，因此您无法使用do.call将更多列表传递给它：

do.call(merge, list(iris, iris, iris))
#Error in fix.by(by.x, x) : 
#  'by' must specify one or more columns as numbers, names or logical

改为使用Reduce：

Reduce(function(x, y) merge(x, y, by="Species"), list(iris, iris, iris))
#works

Answer 2

do.call接受所有参数列表，请尝试：

my.df <- do.call("merge",append(lapply(csvfiles, read.csv, header = TRUE), list(by=c("date","fx_code")) )

使用do.call合并R中的多个csv文件

2 个答案: