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)
})

在多个文件上使用lapply和read.csv（在R中）

1 个答案: