file-io - R 中 apply + rbind 的问题

Question

我似乎无法让以下内容发挥作用

directory <- "./"
files.15x16 <- c("15x16-70d.out", "15x16-71d.out")
data.15x16<-rbind( lapply( as.array(paste(directory, files.15x16, sep="")), FUN=read.csv, sep=" ", header=F) )

它应该做的事情非常简单 - 我有一个目录名、一些文件名和实际的数据文件。我将目录和文件名粘贴在一起，从文件中读取数据，然后将它们全部绑定(bind)到一个数据 block 中。

除了lapply的结果有[[]]中的数据- 即，通过 a[[1]], a[[2]], 访问它等等rbind看来不接受。

建议？

Answer 1

使用do.call:

data.15x16 <-  do.call(rbind, lapply(paste(directory, files.15x16, sep=""), 
                                      FUN=read.csv, sep=" ", header=F)) 

您也不需要 as.array - 它在这里并没有真正做任何事情。