fitMeasures | R Documentation |
This function computes a variety of fit measures to assess the global fit of a latent variable model.
fitMeasures(object, fit.measures = "all", baseline.model = NULL, fm.args = list(standard.test = "default", scaled.test = "default", rmsea.ci.level = 0.90, rmsea.close.h0 = 0.05, rmsea.notclose.h0 = 0.08), output = "vector", ...) fitmeasures(object, fit.measures = "all", baseline.model = NULL, fm.args = list(standard.test = "default", scaled.test = "default", rmsea.ci.level = 0.90, rmsea.close.h0 = 0.05, rmsea.notclose.h0 = 0.08), output = "vector", ...)
object |
An object of class |
fit.measures |
If |
baseline.model |
If not NULL, an object of class
|
fm.args |
List. Additional options for certain fit measures. The
|
output |
Character. If |
... |
Further arguments passed to or from other methods. Not currently
used for |
A named numeric vector of fit measures.
HS.model <- ' visual =~ x1 + x2 + x3 textual =~ x4 + x5 + x6 speed =~ x7 + x8 + x9 ' fit <- cfa(HS.model, data=HolzingerSwineford1939) fitMeasures(fit) fitMeasures(fit, "cfi") fitMeasures(fit, c("chisq", "df", "pvalue", "cfi", "rmsea")) fitMeasures(fit, c("chisq", "df", "pvalue", "cfi", "rmsea"), output = "matrix") print(fitMeasures(fit, c("chisq", "df", "pvalue", "cfi", "rmsea"), output = "text"), add.h0 = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.