string formula not evaluated in global environment?

Question

The string formula in the loop throws an error with standardize(), whereas the non-loop versions do not. Environment issue?

library(arm)
set.seed(1)         


        

Answer 1

It is important that the formula is actually substituted in the lm object:

for (i in list(quote(x1), quote(x2))) {
    f <- bquote(y ~ .(i))
    m0 <- eval(bquote(lm(.(f), data=df)))
    m0z <- arm::standardize(m0)
}