Editado
Quando utilizamos uma regressão logistica tradicional e fazemos uma predição em R por exemplo:
library(dplyr)
n = 300
xx<-c("r1","r2","r3","r4","r5")
xxx<-c("e1","e2","e3")
p=0.3
df1 <- data_frame(
xx1 = runif(n, min = 0, max = 10),
xx2 = runif(n, min = 0, max = 10),
xx3 = runif(n, min = 0, max = 10),
School = factor(sample(xxx, n,re=TRUE)),
Rank = factor(sample(xx, n,re=TRUE)),
yx = as.factor(rbinom(n, size = 1, prob = p))
)
df1
mm<-glm(yx ~ xx1 + xx2 + xx3 + School + Rank,binomial,df1)
n11 = data.frame(School="e3",Rank="r2",xx1=8.58,xx2=8.75,xx3=7.92)
predict(mm, n11, type="response") #No meu caso especifico
ou predict(mm, n11)
dependendo do que nos interessa, sem problema.
Mas quando trabalhamos com GLMM, por exemplo
library(lme4)
mm2 <- glmer(yx ~ xx1 + xx2 + xx3 + Rank + (Rank | School), data = df1,
family = "binomial",control = glmerControl(calc.derivs = FALSE))
predict(mm2, n11, type="response") #No meu caso especifico
apresenta o erro
Error in `contrasts<-`(`*tmp*`, value = contr.funs[1 + isOF[nn]]) :
contrastes podem ser aplicados apenas a fatores com 2 ou mais níveis
Tentei fazer assim
predict(m2,n11, re.form=(~Rank|School))
e apresenta o erro
Error in UseMethod("predict") :
no applicable method for 'predict' applied to an object of class "glmmadmb"
Qual seria a forma correta da predição em R em GLMM?
R
, de modo que as pessoas que querem te ajudar consigam fazer isto da melhor maneira possível.