我有一个文件夹，其中包含数百个要加载到R环境中的CSV文件，但我只想 Select 数据超过9行的文件.我希望每个CSV文件都是自己的数据框，用于我的下一个分析步骤.
我已经有了一种方法来读取每个单独的CSV
filenames <- gsub("\\.csv$","", list.files(pattern="\\.csv$"))
for(i in filenames){
assign(i, read.csv(paste(i, ".csv", sep="")))
}
但是我想不出如何只加载超过9行的CSV.
除了速度非常快之外，包{vroom}还提供了一些很好的实用程序来处理许多文本文件.
示例:
all_files <- list.files('path/to/csv/dir', pattern = '\\.csv$', full.names = TRUE)
library(vroom)
large_files <-
all_files |>
Filter(f = \(file_name) length(vroom_lines(file_name)) > 9)
all_data <- vroom(large_files, id = 'source_file')
large_files |>
Map(f = \(file_name) read.csv(file_name)) |>
setNames(nm = gsub('.*/(.*)\\..*', '\\1', large_files)) |>
list2env(envir = .GlobalEnv)