Exécution de souris avec une formule comme variable: évaluation instantanée au lieu d'une évaluation ultérieure?

Question

Le paquet Rmice est livré avec exemple suivant:

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

Je veux un appel flexible de with() comme:

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

Mais cela jette Error in eval(predvars, data, env) : object 'bmi' not found. J'ai cherché des problèmes similaires. Le problème de placard que j'ai trouvé était Help understand the error in a function I defined in R. Mon impression est, que l'écriture exp=lm(model_formula) l'expression lm(model_formula) est évaluée immédiatement, mais lors de l'écriture exp = lm(bmi~hyp+chl) il n'est pas évalué tout de suite - au lieu de la eavuation aura lieu dans la fonction with.mice()? Et si oui, comment puis-je empêcher une évaluation instantanée?

Answer 1

Le commentaire de @ user20650 était l'indice de la solution. Il est nécessaire de changer la formule d'abord à un caractère, qui sera réalisé par format, et fait alors une formule encore:

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