moreFitIndices(object, nPrior = 1)cfa or the sem functions.miPowerFit For the modification indices and their power approach for model fit evaluationHS.model <- ' visual =~ x1 + x2 + x3
textual =~ x4 + x5 + x6
speed =~ x7 + x8 + x9 '
fit <- cfa(HS.model, data=HolzingerSwineford1939)
moreFitIndices(fit)Run the code above in your browser using DataLab