get_sem_fit: Obtain lavaan model fit indices

In vjilmari/vjihelpers: Toolbox of typical helper functions I need

Obtain lavaan model fit indices

Description

Obtain lavaan model fit indices

Usage

get_sem_fit(model, round = 6)

Arguments

model	Fitted lavaan model.
round	Rounding for the numeric output.

Value

Fit indices and model statistics.

Examples

set.seed(21417)
x <- rnorm(1000)

d <- data.frame(
  x1 = sqrt(.50) * x + sqrt(1 - .50) * rnorm(1000),
  x2 = sqrt(.50) * x + sqrt(1 - .50) * rnorm(1000),
  x3 = sqrt(.50) * x + sqrt(1 - .50) * rnorm(1000),
  x4 = sqrt(.50) * x + sqrt(1 - .50) * rnorm(1000)
)

mod <- "X=~x1+x2+x3+x4"

fit1 <- lavaan::cfa(mod, d)

get_sem_fit(fit1, round = 3)

vjilmari/vjihelpers documentation built on May 23, 2022, 6:43 p.m.