d <- NULL
datafiles <- list.files(path = "C:___")
for (i in datafiles){
print(i)
j <- read.csv(i, header = T)
j$file <- i
d <- rbind(d, j)
}
当我只运行打印行时,显示了文件夹中的所有csv名称,但是除了j&lt; - 行之外的所有内容都会弹出一个错误。当我运行整个代码时,我得到的错误是:
Error in file(file, "rt") : cannot open the connection In addition:
Warning message:
In file(file, "rt") :
cannot open file 'xxx.csv': No such file or directory
任何建议都将不胜感激,谢谢!
答案 0 :(得分:1)
你可以尝试:
library(tidyverse)
file_list <- list.files()
df <- map_dfr(file_list, read_csv)
或者:
file_list <- list.files()
df <- do.call("rbind", lapply(file_list, read_csv))
确保使用setwd()
正确设置工作目录。