require(ggplot2); require(lme4);
fm1 <- lmer(Reaction ~ Days + (Days | Subject), sleepstudy)
(p1 <- plotREsim(REsim(fm1)))
#Plot just the random effects for the Days slope
(p2 <- plotREsim(REsim(fm1)[REsim(fm1)$term=="Days",]))
Run the code above in your browser using DataLab