如何在R语言函数中批量重命名.rda文件导入的result变量？

这个问题我之前也碰到过，直接像paste0(new_name ,"_result") <- result这样用字符串赋值确实行不通，因为R的赋值运算符<-左边需要是**符号（symbol）**而不是字符串。不过用assign()函数就能完美解决这个需求，下面给你详细的实现方案：

单个.rda文件处理函数 #

先写一个处理单个文件的函数，它会自动提取文件名、加载数据，并把result变量重命名为文件名_result的格式：

load_and_rename_rda <- function(file_path) {
  # 提取不带后缀的文件名（比如从"data_sample.rda"得到"data_sample"）
  base_name <- tools::file_path_sans_ext(basename(file_path))
  
  # 创建临时环境加载文件，避免直接污染全局环境
  temp_env <- new.env()
  load(file_path, envir = temp_env)
  
  # 把临时环境里的result变量，以新名字赋值到全局环境
  new_var_name <- paste0(base_name, "_result")
  assign(new_var_name, temp_env$result, envir = .GlobalEnv)
  
  # 清理临时环境，可选操作（避免内存占用）
  rm(temp_env)
  
  # 如果之前不小心把result加载到了全局环境，也可以顺便删掉
  if (exists("result")) rm(result)
}

批量处理所有.rda文件 #

如果你的目标.rda文件都在当前工作目录里，用下面的代码就能一次性处理全部：

# 获取当前目录下所有.rda文件的完整路径
all_rda_files <- list.files(pattern = "\\.rda$", full.names = TRUE)

# 批量调用处理函数
lapply(all_rda_files, load_and_rename_rda)

关键要点解释 #

• 为什么用临时环境？直接load()会把result加载到全局环境，多个文件加载时会反复覆盖这个变量，用临时环境可以先把数据存起来，再按需重命名赋值，更安全干净。
• assign()函数的作用：它可以把一个对象赋值给字符串指定的变量名，第三个参数envir = .GlobalEnv表示把新变量放到全局环境里，方便后续调用。

比如你有个文件叫sales_data.rda，处理后就会在全局环境里得到sales_data_result这个变量，完全符合你的需求~

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