showClass("lmeb")
data(DT_example, package="enhancer")
DT <- DT_example
A <- A_example
## Compound simmetry (CS) model
ans1 <- lmeb(Yield~Env + (1|Name) + (1|Env:Name),
data=DT)
fitted(ans1)
residuals(ans1)
rr <- ranef(ans1)
Run the code above in your browser using DataLab