# NOT RUN {
# a simple MCMCglmm model
data(PlodiaPO)
m <- MCMCglmm(PO ~ 1, random = ~ FSfamily, data = PlodiaPO, verbose=FALSE)
# extract the random effects levels
ranefLevels(m, PlodiaPO)
# }
Run the code above in your browser using DataLab