如何在R中合并含相同对象名的多个Rdata文件并保存为新文件

可直接运行的完整代码 #

# 1. 填入你所有要合并的Rdata文件路径，注意替换为你自己的真实文件名，不要重复填写
all.files <- c("data1.Rdata", "data2.Rdata", "data3.Rdata")

# 2. 批量加载文件并提取同名对象
mylist <- lapply(all.files, function(x) {
  # 新建临时环境加载文件，避免污染全局变量
  temp_env <- new.env()
  load(x, envir = temp_env)
  # 提取环境中的唯一对象，如果你确定所有文件里的目标对象同名（比如都叫df），也可以直接写 get("df", envir = temp_env)
  obj_names <- ls(temp_env)
  return(get(obj_names[1], envir = temp_env))
})

# 3. 给列表元素命名，你也可以自定义命名规则，不使用文件名也可以
names(mylist) <- all.files

# 4. 导出合并后的文件到指定目录，替换为你自己的目标存储路径
save(mylist, file = "你的指定目录路径/combined_result.Rdata")

代码说明 #

• 你原来的代码报错主要是直接在全局环境执行load()，ls()会把全局环境里的其他变量也统计进去，用临时环境加载可以完全规避这个问题
• 如果所有Rdata里的对象都是数据框/矩阵，你需要把它们按行合并为一个对象，可以在加载完列表后加一行代码：combined_df <- do.call(rbind, mylist)，再单独保存这个合并后的数据框即可
• 如果你的Rdata里包含多个对象，可以修改get()部分的逻辑，按你需要的对象名提取即可

内容的提问来源于stack exchange，提问作者Shrilaxmi M S