r - 如何使用apply函数将多个数据表读入R？

我对 R 比较陌生，我在使用 apply 函数从目录中读取多个表时遇到问题。我想让该函数做的是使用一个带有指向我感兴趣的表的路径的向量，并生成一个列表，其中包含与该文件中的路径相对应的每个数据框的对象。我编写了以下代码:

f<- function(directory){
    file.list <<- list.files(directory)
    file.paths <<- as.vector(paste(directory, file.list, sep = "/"))
    tables <- lapply(X = file.paths, FUN = read.table, header = TRUE,sep = "\t" ))
}

根据我的理解，我正在做的是在我想要的目录中创建一个文件名列表，创建这些文件的路径，并且(我失败的地方是)遍历这些路径并导入它们对应的表对于整个 file.paths 对象并生成包含这些表的列表。我收到以下错误:

Error in FUN(X[[i]], ...) : no lines available in input

任何人都可以提供任何建议吗？

最佳答案

以下是一些选项，具体取决于您希望输出的内容:

数据框列表

# Load library
  library(data.table)

# Get a List of all files named with a key word, say all `.csv` files
  filenames <- list.files("C:/your/folder", pattern="*.csv", full.names=TRUE)

# Load data sets
  list.DFs <- lapply(filenames,fread)

我假设您的数据文件以 .csv 格式保存。请注意，fread 等效于 read.table 但要快得多

将多个数据帧绑定(bind)为一个数据帧

# Get a List of all files named with a key word, say all `.csv` files
  filenames <- list.files("C:/your/folder", pattern="*.csv", full.names=TRUE)

 # Load and bind all data sets
   data <- rbindlist(lapply(filenames,fread))

将多个数据帧作为不同对象加载到全局环境

# Get a List of DF in the directory
  filenames <- list.files("C:/your/folder", pattern="*.Rda", full.names=TRUE)

# Load data sets
  lapply(filenames, load, .GlobalEnv)