# \donttest{
fm1 <- lmer(Reaction ~ Days + (Days | Subject), sleepstudy)
(p1 <- plotREsim(REsim(fm1)))
#Plot just the random effects for the Days slope
(p2 <- plotREsim(REsim(fm1), facet= list(groupFctr= "Subject", term= "Days")))
# }
Run the code above in your browser using DataLab