Bom dia, Estava rodando o código R presente no paper: http://www.jstatsoft.org/v20/i02/paper require(lme4) data("lq2002", package = "multilevel") wrk <- lq2002 for (i in 3:16) wrk[[i]] <- ordered(wrk[[i]]) for (i in 17:21) wrk[[i]] <- ordered(5 - wrk[[i]]) lql <- reshape(wrk, varying = list(names(lq2002)[3:21]), v.names = "fivelev", idvar = "subj", timevar = "item", drop = names(lq2002)[c(2, 22:27)], direction = "long") lql$itype <- with(lql, factor(ifelse(item < 12, "Leadership", ifelse(item < 15, "Task Sig.", "Hostility")))) for (i in c(1, 2, 4, 5)) lql[[i]] <- factor(lql[[i]]) lql$dichot <- factor(ifelse(lql$fivelev < 4, 0, 1)) str(lql) summary(lql) (fm1 <- lmer(dichot ~ 0 + itype + (1 | subj) + (1 | COMPID) + (1 | item), lql, binomial)) rr <- ranef(fm1, postVar = TRUE) str(rr) qq <- qqmath(rr) print(qq$subj) O executei no terminal e rodou perfeitamente (R 2.14 dev compilado dos fontes - linux ubuntu) Quando fui executar no RStudio (Mesmo computador, mesmo usuário), encontro a seguinte mens de erro:
print(qq$subj) Error in x$xscale.components(x$x.limits, at = x$x.scales$at, used.at = x$x.used.at, : could not find function "calculateAxisComponents"
Isso é normal ou loucura do RStudio? O resultado esperado do comando é o gráfico na pág 12 do Paper (o da esquerda). Isso eu consegui no R (terminal) -- []s Leonard de Assis assis <dot> leonard <at> gmail <dot> com