Как использовать символ в качестве атрибута функции

Я хочу провести анализ множественных сравнений для различных переменных модели. Моя идея заключается в следующем:

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. Кто-нибудь знает решение?

Ответы на вопрос(3)

Ваш ответ на вопрос