Rev 3955 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed
## library(lme4)## This example takes too long## if (isTRUE(try(data(star, package = 'mlmRev')) == 'star')) {## fm1 <- lme4:::carryOver(math ~ gr+sx*eth+cltype+(yrs|id)+(1|tch)+(yrs|sch),## star, yrs ~ tch/id,## control = list(msV = 1, nit = 0, grad = 0))## print(fm1, corr = FALSE)## }