R语言：不修改who2007源码，实现字符向量迭代调用函数

我碰到过类似的情况，这个who2007函数的内部实现确实有点特殊——它依赖deparse(substitute())来提取你传入的参数名称，这就导致直接传字符串（比如age='Age'）和传裸变量名（age=Age）的行为完全不一样：前者会让函数拿到带引号的列名字符串，最终取出的是一个data.frame（也就是你说的list类型）；后者才会正确取出向量（double类型）。

因为你不能修改函数源码，我们可以通过把字符向量转成符号（symbol）传入的方式，模拟直接写裸变量名的效果。下面是几个实用的解决方案：

方法1：用do.call构造参数列表 #

这是最通用的基础R方法，不需要额外包：

# 示例数据框
mydf <- data.frame(Age = c(12, 24, 36),
                   Weight = c(8, 12, 15),
                   Height = c(75, 90, 100),
                   Sex = c("m", "f", "m"))

# 你的列名字符向量（对应函数的sex/age/weight/height参数）
col_names <- list(sex = "Sex", age = "Age", weight = "Weight", height = "Height")

# 把字符串转成符号（模拟裸变量名）
col_symbols <- lapply(col_names, as.name)

# 用do.call调用函数，自动把符号作为参数传入
result <- do.call(who2007, c(list(mydf = mydf), col_symbols))

这样do.call会帮你把符号参数传递给函数，和你手动写who2007(mydf, sex=Sex, age=Age, ...)的效果完全一致，函数内部能正确取出向量。

方法2：用rlang包的准引用（适合tidyverse用户） #

如果你习惯用tidyverse的语法，可以用rlang的符号注入功能：

library(rlang)

# 从字符向量创建符号
sex_sym <- sym(col_names$sex)
age_sym <- sym(col_names$age)
weight_sym <- sym(col_names$weight)
height_sym <- sym(col_names$height)

# 用!!把符号注入到函数调用中
result <- who2007(mydf,
                  sex = !!sex_sym,
                  age = !!age_sym,
                  weight = !!weight_sym,
                  height = !!height_sym)

!!在这里的作用是告诉R：不要把sex_sym当成普通变量，而是把它代表的符号（比如Sex）传入函数。

方法3：封装成循环用的函数 #

如果你需要循环处理多组列名，可以把逻辑封装成一个小函数，方便重复调用：

run_who_calculation <- function(df, sex_col, age_col, weight_col, height_col) {
  # 把列名字符串转成符号
  sex_sym <- as.name(sex_col)
  age_sym <- as.name(age_col)
  weight_sym <- as.name(weight_col)
  height_sym <- as.name(height_col)
  
  # 用eval+substitute构造正确的函数调用
  eval(substitute(who2007(mydf = df,
                          sex = sex_sym,
                          age = age_sym,
                          weight = weight_sym,
                          height = height_sym)))
}

# 循环调用示例（比如你有多个年龄列需要处理）
age_cols <- c("Age1", "Age2", "Age3")
all_results <- lapply(age_cols, function(col) {
  run_who_calculation(mydf, "Sex", col, "Weight", "Height")
})

这些方法都不需要修改who2007的源码，完全适配多用户使用的场景，能解决你循环传字符串列名时的类型错误问题。

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