## model specification examples
# simple uni-factorial model
model <- "F1 =~ a1 + a2 + a3 + a4 + a5"
## two function calls
a <- ezCutoffs(model = model, n_obs = 1000, n_rep = 10, n_cores = 1, normality = "assumed")
b <- ezCutoffs(model = model, n_obs = 1000, n_rep = 10, n_cores = 1, normality = "empirical")
## comparison of the fit measure distributions yielded by the simulations
w <- compareFit(a, b)
summary(w)
Run the code above in your browser using DataLab