如何解决devtools::check()提示的“发现对全局环境的赋值”问题？

核心问题 #

R包检查工具会标记向全局环境（globalenv()/.GlobalEnv）的赋值操作，因为这不符合包的模块化设计规范——包不应随意修改用户的工作环境。

适配动态迭代场景的替代方案 #

• 创建包专属环境存储动态数据：在包的顶层文件（比如zzz.R）定义一个专属环境，用来存放迭代过程中变化的数据，既满足模块间数据共享需求，又不会污染全局环境。示例代码：

  # 包顶层定义专属环境
  .pkg_internal_env <- new.env(parent = emptyenv())
  
  # 替换infrastructure.R中的assign语句
  assign(x, value, envir = .pkg_internal_env)
  assign(oname, z, envir = .pkg_internal_env)
  

• 通过函数返回值传递数据：如果模块间的依赖关系允许，尽量用函数返回值传递数据，替代跨模块的环境赋值。这种方式更符合函数式编程规范，数据流转逻辑也更清晰。

• 用选项临时存储短生命周期数据：如果数据仅需临时传递，可借助options()存储和读取，用完后及时清除避免残留：

  # 赋值临时数据
  options(rrclust_temp_data = list(key1 = value1, key2 = value2))
  # 读取数据
  temp_data <- getOption("rrclust_temp_data")
  # 清理临时选项
  options(rrclust_temp_data = NULL)
  

关键原则 #

无论采用哪种方案，核心都是避免直接操作全局环境，让包的内部数据流转在自身可控范围内完成，既符合CRAN包规范，也能让包的行为更可预测。

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