如何在testthat测试中传递系统变量或包选项

你的问题根源在于test_check()会启动一个独立的R子进程来运行测试，你在testthat.R父进程里设置的环境变量不会自动传递到子进程中，所以测试读不到。下面是几个可行的解决办法：

方法1：用testthat的全局setup文件 #

在tests/testthat目录下创建setup.R文件，把环境变量设置写在这里：

Sys.setenv("test123" = "test")

testthat会在所有测试脚本执行前自动加载这个文件，而且是在测试的子进程环境中执行，变量能被所有测试读取。这是最符合testthat规范的做法。

方法2：用withr包裹test_check #

在testthat.R里用withr::with_envvar()来临时设置环境变量，确保变量在test_check的子进程中生效：

library(withr)
with_envvar(c(test123 = "test"), {
  test_check("MyPackage")
})

这个方法的好处是环境变量只在测试执行期间生效，不会污染全局环境。

方法3：通过项目.Renviron文件设置 #

如果这个环境变量是项目长期需要的，可以在项目根目录创建.Renviron文件，写入：

test123=test

保存后重启R会话，整个项目的R环境（包括测试）都会自动加载这个变量。缺点是这个变量会对整个项目会话生效，不仅仅是测试。

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