如何根据文件名将多个csv文件加载到R中的单独对象（数据帧）中？

Question

我知道如何使用以下方法轻松加载整个 .csv 文件文件夹：

csv_files = list.files(pattern ="*.csv")
myfiles = lapply(csv_files, read.delim, header = FALSE)

然后我可以轻松地迭代“myfiles”它们并执行我想要的任何操作。我遇到的问题是这只是加载工作目录中的所有 .csv 文件。

我想做的是能够根据文件名将文件分配给脚本中的对象。

举例来说，在一个目录中我有这些文件；文件001、文件002、文件003 和exfile001、exfile002、exfile003。

我希望能够以这样的方式加载它们，

file_object <- file...
exfile_object <- exfile...

这样当我执行脚本时，它基本上会执行我为 file_object 编程的任何操作（在本例中分配为 file001）& exfile_object（在此示例中指定为 exfile001）。然后继续以这种方式处理目录中的其余文件（例如 file002、exfile002、file003、exfile003）。

我知道如何在 MATLAB 中做到这一点，但我刚刚开始掌握 R。

我想也许使用 list.files 函数将它们放入单独的列表中可能只需更改脚本中的工作目录即可，但这看起来很混乱并且需要重新-写下我的情况...

谢谢！

Answer 1

任何好奇的人的解决方案...

files <- list.files(pattern = ".*csv")

for(file in 1:length(files)) { 
  file_name <- paste(c("file00",file), collapse = " ")
  file_name <- gsub(" ", "", file_name, fixed = TRUE)
  ex_file_name <- paste(c("exfile00",file), collapse = " ")
  ex_file_name <- gsub(" ", "", ex_file_name, fixed = TRUE)
  
  file_object <- read.csv(file = paste(file_name, ".csv", sep=""),fileEncoding="UTF-8-BOM")
  exfile_object <- read.csv(file = paste(ex_file_name, ".csv", sep=""),fileEncoding="UTF-8-BOM")
  }

本质上在循环中构建文件名，然后在每次迭代时将其传递给 readcsv 函数。

Answer 2

如果您的框架列表 myfiles 使用以下方式命名：

names(myfiles) <- gsub(".csv", "", csv_files)

那么您可以

list2env(myfiles, globalenv())

将这些单独的框架转换为全局环境中的单独对象。