data(studentratings)
require(jomo)
# impute data using jomo (native functions)
clus <- studentratings[,"ID"]
imp <- jomo(Y=studentratings[,c("ReadAchiev","ReadDis")], clus=clus)
# split imputations
impList <- long2mitml.list(imp, split="Imputation", exclude=0)
impList <- jomo2mitml.list(imp)
Run the code above in your browser using DataLab