powered by
arm::display
fastdisp(merMod, ...)
display
#Compare the time for displaying this modest model require(arm) m1 <- lmer(y ~ lectage + studage + (1|d) + (1|s), data=InstEval) system.time(display(m1)) system.time(fastdisp(m1))
Run the code above in your browser using DataLab