R语言使用for循环读取csv时如何为提取的列列表动态命名

云原生阿岚

2026-9-26

R 语言动态生成命名列表的实现方案

R 社区更推荐将同类结果统一存储在一个命名列表中，避免污染全局环境，后续批量处理也更方便，这是最优选择。如果确实需要生成独立的全局变量，可以参考第二种方法。

方案1：统一存储到命名列表（推荐）

# 定义名称映射向量
Names <- c("1", "2", "3")
# 读取所有csv文件路径，正则修正为仅匹配csv后缀的文件
Tables <- list.files(".", recursive = TRUE, pattern = "\\.csv$", full.names = TRUE)
# 初始化结果列表
result_list <- list()

for (i in seq_along(Tables)) {
  print(Tables[i])
  df <- read.csv(Tables[i], header = TRUE)
  # 按Names的对应值命名，提取指定列
  result_list[[paste0("list_", Names[i])]] <- df[[Names[i]]]
}

后续可以直接通过result_list$list_1、result_list$list_2的方式调用对应列表，批量操作时直接对result_list使用lapply等函数即可，比分散的独立变量管理效率高很多。

方案2：生成独立的全局变量

如果必须生成list_1、list_2这类独立的全局变量，可以使用assign函数实现：

Names <- c("1", "2", "3")
Tables <- list.files(".", recursive = TRUE, pattern = "\\.csv$", full.names = TRUE)

for (i in seq_along(Tables)) {
  print(Tables[i])
  df <- read.csv(Tables[i], header = TRUE)
  # 直接在全局环境生成对应名称的变量
  assign(paste0("list_", Names[i]), df[[Names[i]]])
}