if (FALSE) {
data(dataEP05A2_1)
fit <- anovaVCA(y~day/run, dataEP05A2_1)
ranef(fit)
# get variable-specific random effects (REs)
# both extract the same REs
ranef(fit, "day")
ranef(fit, 1)
# get standardized REs
ranef(fit, "day:run", "standard")
# or studentized REs
ranef(fit, 2, "stu")
}
Run the code above in your browser using DataLab