if (FALSE) {
data(hungary1, package = "R2MLwiN")
(mymodel <- runMLwiN(c(es_core, biol_core, biol_r3, biol_r4, phys_core, phys_r2) ~
1 + female + (1 | school) + (1 | student),
D = "Multivariate Normal", estoptions = list(EstM = 1), data = hungary1))
}
Run the code above in your browser using DataLab