如何在R脚本间复用指定单个变量，而非加载整个脚本？

这里有几个实用的方案，帮你只提取1_script.R里的combs变量，不用加载整个脚本的所有内容：

方案1：将变量保存为独立R数据文件（最简单直接） #

在1_script.R中，当你生成完combs矩阵后，添加一行代码把它单独保存成R数据文件：

# 1_script.R 中生成combs后执行
save(combs, file = "combs_data.RData")

然后在2_script.R里，只需要加载这个数据文件就能拿到combs：

# 2_script.R 中加载变量
load("combs_data.RData")
# 现在combs变量就可以直接使用了

优点：操作简单，加载速度快，不需要运行原脚本的其他代码；缺点：会生成额外的本地文件，适合变量不频繁修改的场景。

方案2：用临时环境隔离脚本运行（无额外文件） #

如果不想生成额外文件，可以用sys.source()把原脚本运行在一个临时环境里，再从中提取需要的变量：

# 2_script.R 中执行
# 创建一个临时环境
temp_env <- new.env()
# 在临时环境里运行1_script.R
sys.source("1_script.R", envir = temp_env)
# 从临时环境中提取combs变量
combs <- temp_env$combs

优点：不需要生成额外文件；缺点：原脚本的所有代码还是会被执行，只是不会污染当前工作环境，适合原脚本运行速度快、无副作用的场景。

方案3：重构代码为函数（长期维护最佳实践） #

如果你的项目需要长期维护，最规范的方式是把生成combs的逻辑封装成函数：
在1_script.R中，把生成combs的代码放到一个函数里：

# 1_script.R 中定义生成函数
generate_combs <- function() {
  # 这里写原来生成combs的代码，比如：
  combs <- matrix(1:20, nrow = 10, ncol = 2)
  return(combs)
}

然后在2_script.R里，加载脚本后调用函数获取变量：

# 2_script.R 中调用函数
source("1_script.R")
combs <- generate_combs()

优点：代码结构更清晰，方便后续修改和扩展，也能避免加载不必要的变量；缺点：需要对原脚本做少量重构，适合需要长期迭代的项目。

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