如何在R语言中批量修改文件夹内CSV文件的指定列名？

更优的批量处理方式（推荐） #

用assign()把每个CSV分散成全局环境的独立对象会让后续操作非常繁琐，建议把所有数据框统一存到列表中，批量处理更高效：

1. 重新读取所有CSV到列表

# 获取所有CSV文件路径
csv_paths <- list.files(pattern = "\\.csv$", full.names = TRUE)
# 读取文件并存储为列表，列表名称用去掉后缀的文件名
data_list <- lapply(setNames(csv_paths, tools::file_path_sans_ext(basename(csv_paths))), read.csv)

2. 批量修改列名
   假设你要将所有数据框中的old_column重命名为new_column，用lapply遍历列表完成批量修改：

# 定义列名替换规则
target_old <- "old_column"
target_new <- "new_column"

# 遍历修改
updated_data_list <- lapply(data_list, function(df) {
  if (target_old %in% names(df)) {
    names(df)[names(df) == target_old] <- target_new
  }
  df
})

针对已用assign创建的对象的处理方法 #

如果已经用原脚本创建了全局对象，按以下步骤修改：

allsp <- gsub("\\.csv$", "", list.files(pattern = "\\.csv$"))

for (sp in allsp) {
  # 获取当前对象
  obj <- get(sp)
  # 若不是数据框则转换
  if (!is.data.frame(obj)) {
    obj <- as.data.frame(obj, stringsAsFactors = FALSE)
  }
  # 修改目标列名
  names(obj)[names(obj) == "old_column"] <- "new_column"
  # 把修改后的对象放回全局环境
  assign(sp, obj)
}

关于“对象看似不是dataframe”的可能原因 #

• 部分CSV为空或只有表头无数据，返回的是0行数据框，容易被误判；
• 读取时未正确设置header参数，导致列名默认设为V1、V2等；
• 可通过class(get("对象名"))查看具体类型，确认后再处理。

内容的提问来源于stack exchange，提问作者Valentina Todisco