Как использовать символ в качестве атрибута функции
Я хочу провести анализ множественных сравнений для различных переменных модели. Моя идея заключается в следующем:
library(multcomp)
set.seed(123)
x1 <- gl(4,10)
x2 <- gl(5,2,40)
y <- rnorm(40)
fm1 <- lm(y ~ x1 + x2)
for(var in c('x1', 'x2'))
{
mc1 <- glht(fm1, linfct=mcp(var='Tukey'))
print(summary(mc1))
}
Когда я бегу, я получаю следующую ошибку:
Error en mcp2matrix(model, linfct = linfct) :
Variable(s) ‘var’ have been specified in ‘linfct’ but cannot be found in ‘model’!
То есть невозможно использовать символ для указания атрибута функции mcp. Кто-нибудь знает решение?