如何通过字符串间接访问R函数的输入参数以开展参数敏感性测试？

这个问题我之前也碰到过，核心问题在于你试图用变量代替参数名，但直接在函数调用里写param_name = ...其实是把param_name当成了字面量参数名，而不是解析它的值作为参数名。下面给你两种实用的解决方法：

方法1：基础R的do.call()函数（推荐） #

这是最通用的方案，不需要额外依赖，完全用基础R就能实现。核心思路是先构造一个命名参数列表，把你要指定的参数名（字符串形式）作为列表的名字，对应的参数值作为列表元素，再用do.call()把这个列表传递给函数：

# 定义你的函数
b <- function(x = 2, y = 3){ return(x + y) }

# 指定要修改的参数名（字符串）和对应值
param <- 'y'
param_value <- 2

# 构造命名参数列表
args_list <- list()
args_list[[param]] <- param_value

# 调用函数，未指定的参数自动使用默认值
do.call(b, args_list)
# 输出：4（x用默认值2，y传了2，2+2=4）

如果需要批量测试多个参数的敏感性，你可以循环生成不同的args_list，比如：

# 测试x和y分别取不同值的情况
params_to_test <- list(c('x', 1), c('x', 3), c('y', 1), c('y', 4))
for (p in params_to_test) {
  args <- list()
  args[[p[1]]] <- as.numeric(p[2])
  result <- do.call(b, args)
  cat(sprintf("当%s=%s时，结果为%s\n", p[1], p[2], result))
}

方法2：tidyverse风格的非标准求值（可选） #

如果你习惯用tidyverse生态，可以用rlang包的!!!操作符（“解引用”操作符），把命名列表展开成函数的参数：

library(rlang)

# 同样构造命名参数列表
args_list <- list()
args_list[[param]] <- param_value

# 直接调用函数并展开列表
b(!!!args_list)
# 输出：4

这个方法语法更简洁，但需要依赖rlang包，适合已经在使用tidyverse的场景。

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