Print an sem_outs-Class Object

Print the content of an sem_outs-class object.

Usage

# S3 method for class 'sem_outs'
print(x, max_models = 20, ...)

Arguments

x

An sem_outs-class object.

max_models

The maximum number of models to be printed. Default is 20.

...

Optional arguments. Ignored.

Value

x is returned invisibly. Called for its side effect.

Details

The print method for the output of fit_many().

See also

An sem_outs-class object is generated by fit_many().

Author

Shu Fai Cheung https://orcid.org/0000-0002-9871-9448

Examples

library(lavaan)
dat <- dat_path_model
mod <-
"
x3 ~ a*x1 + b*x2
x4 ~ a*x1
ab := a*b
"
fit <- sem(mod, dat_path_model, fixed.x = TRUE)
mod_to_add <- get_add(fit)
out <- fit_many(mod_to_add, fit)
#> 
#> Fit the 2 model(s) (duplicated models removed):
out
#> 
#> Call:
#> fit_many(model_list = mod_to_add, sem_out = fit)
#> 
#> Number of model(s) fitted: 2
#> Number of model(s) converged: 2
#> Number of model(s) passed post.check: 2
#> 
#> The modification(s)/model(s):
#> add: x4~x2
#> add: (x3~x1),(x4~x1) 
print(out, max_models = 1)
#> 
#> Call:
#> fit_many(model_list = mod_to_add, sem_out = fit)
#> 
#> Number of model(s) fitted: 2
#> Number of model(s) converged: 2
#> Number of model(s) passed post.check: 2
#> 
#> The first 1 modifications(s)/model(s):
#> add: x4~x2