# NOT RUN {
data(HolzingerSwineford)
semmodel<-'
L1 =~ V1 + V2 + V3
L2 =~ V4 + V5 + V6
L3 =~ V7 + V8
L4 =~ V9 + V10 + V11
'
# }
# NOT RUN {
run.bts <- eqMI.bootstrap(model = semmodel, data = HolzingerSwineford,
group = "school", meanstructure = TRUE, B = 100, seed = 111)
# }
Run the code above in your browser using DataLab