R 函数不传递字符串变量的内容

Question

我想运行很多 Cox 回归模型，所以我定义了以下函数：

library(tidyverse)
library(finalfit)
runcox <- function(df,dependent,exp_full,label_name="placeholder"){
  coxdata <- df %>%
    finalfit(dependent, 
             exp_full,
             exp_reduced,
             add_dependent_label = FALSE,
             keep_models = TRUE) %>%
    rename(label_name = label) %>% 
    rename(" " = levels) %>%
    rename("  " = all) 
  
  return(coxdata)
}

现在调用函数

runcox(data,dependent,explanatory,"Overall Survival")

有效，但cox模型的标签仍然是

"placeholder"

，而不是将标签调整为传递的变量内容

label_name="Overall Survival"

.

将

rename(label_name = label)

更改为

rename("Overall Survival" = label)

也可以，但它希望这是一个我可以传递给函数的变量。

感谢任何帮助