# NOT RUN {
data(dataMultilevelIV)
endoVars <- matrix(dataMultilevelIV[,"X15"])
colnames(endoVars) <- c("X15")
formula1 <- y ~ X11 + X12 + X13 + X14 + X15 + X21 + X22 + X23 + X24 +
X31 + X32 + X33 + (1 + X11 | CID) + (1|SID)
model1 <- multilevelIV(formula=formula1, endoVar=endoVars, data=dataMultilevelIV)
summary(model1,"REF")
# }
Run the code above in your browser using DataLab