fitMeasures_by_models {semhelpinghands} | R Documentation |
Fit Measures By Models
Description
Groups fit measures into a table with models as columns.
Usage
fitMeasures_by_models(object_list, ...)
Arguments
object_list |
A named list of lavaan objects. |
... |
Optional arguments to be
passed to
|
Details
It call lavaan::fitMeasures()
to
compute for each model the fit
measures supported by lavaan
, and
combine them into a data frame. Users
can then use the print method
(print.fit_by_models()
) to customize
the printout.
To be consist with full lavaan
output, the names used in
lavaan::fitMeasures()
are used.
This function is intended for
a simple and compact table of
fit measures for quick preview.
For a well-organized
layout, call lavaan::fitMeasures()
and set output
to "text"
.
Value
A data-frame-like object of
the class fit_by_models
, which
has a print
method (see
print.fit_by_models()
).
Author(s)
Shu Fai Cheung https://orcid.org/0000-0002-9871-9448.
See Also
Examples
library(lavaan)
set.seed(5478374)
n <- 50
x <- runif(n) - .5
m <- .40 * x + rnorm(n, 0, sqrt(1 - .40))
y <- .30 * m + rnorm(n, 0, sqrt(1 - .30))
dat <- data.frame(x = x, y = y, m = m)
model1 <-
'
m ~ a*x
y ~ b*m
ab := a*b
'
fit1 <- sem(model1, data = dat, fixed.x = FALSE)
model2 <-
'
m ~ a*x
y ~ b*m + x
ab := a*b
'
fit2 <- sem(model2, data = dat, fixed.x = FALSE)
fitMeasures_by_models(list(no_direct = fit1,
direct = fit2))