R函数中参数值未被module(load)解析，如何传递参数值？

问题根源 #

Lmod的R接口中，module()函数默认采用非标准求值逻辑，直接传入变量名时，它会把变量符号（比如package_name）当作字面量传递，而不会解析变量的实际值，这就是Lmod报错找不到名为package_name模块的原因。

可行解决方案 #

方法1：用do.call()传递参数 #

do.call()可以显式将变量值以参数列表的形式传递给函数，绕过非标准求值的限制，这是最安全可靠的方式：

install.packages <- function(package_name) {
  print(package_name) # 确认参数值正确输出
  # 通过do.call将参数值传入module函数
  do.call(module, list("load", package_name))
  # 后续执行R包安装逻辑...
}

调用示例：install.packages("r-data.table")，此时module(load, "r-data.table")会被正确执行。

方法2：构造表达式并执行 #

如果习惯字符串拼接的方式，可以用sprintf()构造完整的调用语句，再通过eval(parse())执行，注意要用shQuote()处理包名，避免特殊字符引发的问题：

install.packages <- function(package_name) {
  print(package_name)
  # 构造安全的调用表达式
  call_expr <- sprintf("module(load, %s)", shQuote(package_name))
  eval(parse(text = call_expr))
  # 后续安装步骤...
}

为什么之前的eval()/deparse()没生效 #

如果之前直接尝试eval(module(load, package_name))，本质是先执行了module(load, package_name)（此时已经传递了符号而非实际值），再对结果求值，自然无法解决问题；而deparse()只是把符号转成字符串，并没有改变函数参数的传递逻辑，所以也不起作用。

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