# NOT RUN {
data("wafers")
m1 <- HLfit(y ~X1+X2+(1|batch),
resid.model = ~ 1 ,data=wafers,HLmethod="ML")
get_ranPars(m1,which="corrPars") # NULL since no correlated random effect
# }
Run the code above in your browser using DataLab