在多个文件上使用lapply和read.csv(在R中)

Question

我想这是一个初学者的问题,但我还没有找到答案或弄清楚我做错了什么.

我正在尝试使用以下方法读取存储在单独目录中的20个CSV文件:

setwd("./Data")
filenames <- list.files()  
All <- lapply(filenames,function(i){
  i <- paste(".\\",i,sep="")
  read.csv(i, header=TRUE, skip=4)
})

我收到以下错误:

Error in file(file, "rt") : cannot open the connection
In addition: Warning message:
In file(file, "rt") :
  cannot open file '.\filename.csv': No such file or directory

其中filename代表我文件夹中第一个文件的名称.

提前致谢!

Answer 1

尝试删除: i <- paste(".\\",i,sep="")

read.csv应该可以正常list.files(full.names=TRUE)输出

setwd("./Data")
filenames <- list.files(full.names=TRUE)  
All <- lapply(filenames,function(i){
  read.csv(i, header=TRUE, skip=4)
})