如何在R语言中导入文件夹中的多个TXT文件为独立数据集？

我来帮你把这段代码补全并优化，实现批量导入文件夹里的TXT文件作为独立数据集的需求～

你的思路已经很清晰了，先获取文件路径和名称，再批量读取。下面是完善后的代码和细节说明：

完整代码实现 #

# 先把文件夹路径单独存成变量，后续修改更方便
data_folder <- "C:/OneDrive/R Resources/R Books/Mixed Effects Medels/ZuurDataMixedModelling"

# 只获取文件夹下的TXT文件（避免误读其他格式）
datasetpaths <- list.files(data_folder, pattern = "\\.txt$", full.names = TRUE)

# 提取文件名并去掉后缀，作为数据集的名称
datasetnames <- list.files(data_folder, pattern = "\\.txt$", full.names = FALSE)
datasetnames <- sub("\\.txt$", "", datasetnames, ignore.case = TRUE)

# 循环读取每个文件，并用文件名作为数据集名称
for (i in seq_along(datasetpaths)) {
  # 这里根据你的数据格式调整sep和dec参数：
  # sep是分隔符，空格用" "，逗号用","，制表符用"\t"
  # dec是小数点符号，欧洲数据可能是","，默认是"."
  assign(
    datasetnames[i],
    read.table(
      datasetpaths[i],
      header = TRUE,
      dec = ".",
      sep = "\t",
      stringsAsFactors = FALSE
    )
  )
}

关键细节解释 #

• 我在list.files里加了pattern = "\\.txt$"，这样只会匹配后缀为TXT的文件，避免导入无关文件
• 用seq_along循环比直接用索引更安全，能避免路径和名称数量不匹配的问题
• assign()是核心函数：它能把读取到的数据框，直接赋值给我们指定的变量名（也就是处理后的文件名）

更推荐的优化方案：用列表存储数据集 #

在R里，把多个数据集存在一个列表里比创建一堆独立变量更便于管理，后续批量分析也更高效：

# 批量读取所有文件，结果存入列表
data_list <- lapply(
  datasetpaths,
  read.table,
  header = TRUE,
  dec = ".",
  sep = "\t",
  stringsAsFactors = FALSE
)
# 给列表的每个元素命名（对应文件名）
names(data_list) <- datasetnames

# 调用某个数据集时，直接用列表名加$文件名，比如：
head(data_list$your_dataset_name)

这样既满足了你的需求，又避免了工作环境里变量过多导致的混乱～

内容的提问来源于stack exchange，提问作者Tianjian Qin