# NOT RUN {
#Lavaan object example (manual=FALSE)
dat <- lavaan::HolzingerSwineford1939
lavmod <- "F1 =~ x1 + x2 + x3 + x4 + x5 + x6 + x7 + x8 + x9"
fit <- lavaan::cfa(lavmod,dat)
# }
# NOT RUN {
cfaOne(fit)
# }
# NOT RUN {
#Manual entry example for a sample size of 300 (manual=TRUE)
manmod <- "F1 =~ .602*Y1 + .805*Y2 + .857*Y3 + .631*Y4 + .345*Y5 + .646*Y6"
# }
# NOT RUN {
cfaOne(model=manmod,n=300,manual=TRUE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab