使用公式作为变量 : instant evaluation instead of later evaluation? 运行鼠标

Question

R包裹mice带有以下示例:

library("mice")
imp <- mice(nhanes)
fit <- with(data=imp,exp=lm(bmi~hyp+chl))

我想要一个灵活的电话 with()喜欢:

model_formula <- bmi~hyp+chl
fit <- with(data=imp,exp=lm(model_formula))

但这会抛出 Error in eval(predvars, data, env) : object 'bmi' not found .我搜索了类似的问题。我发现的壁橱问题是 Help understand the error in a function I defined in R .
我的印象是，那写 exp=lm(model_formula)表达式 lm(model_formula)立即评估，但在写入时 exp = lm(bmi~hyp+chl)它不会立即计算 - 相反，评估将在函数 with.mice() 中进行?如果是这样，我怎样才能防止即时评估？

Answer 1

@user20650 的评论是解决方案的线索。需要先把公式改成一个字符，可以通过format来实现，然后再把它变成一个公式:

model_formula <- bmi~hyp+chl
fit <- with(data=imp,exp=lm(formula(format(model_formula))))