Show the model fit information
Examples
ex3_1 <- system.file("extdata", "ex3_1.h5", package = "mplush5")
mod_fit <- mplus.print.model.fit.information(ex3_1)
mod_fit
#> description value
#> 1 Number of Free Parameters 4.000000e+00
#> 2 H0 Loglikelihood -6.943337e+02
#> 3 H1 Loglikelihood -6.943337e+02
#> 4 Akaike (AIC) 1.396667e+03
#> 5 Bayesian (BIC) 1.413526e+03
#> 6 Sample-Size Adjusted BIC 1.400830e+03
#> 7 Chi-square : Value 6.098304e-07
#> 8 Chi-square : Degrees of Freedom 0.000000e+00
#> 9 Chi-square : P-Value 0.000000e+00
#> 10 RMSEA : Estimate 0.000000e+00
#> 11 RMSEA : Low CI 0.000000e+00
#> 12 RMSEA : High CI 0.000000e+00
#> 13 RMSEA : Probability 0.000000e+00
#> 14 CFI 1.000000e+00
#> 15 TLI 1.000000e+00
#> 16 Chi-square for Baseline Model : Value 4.695846e+02
#> 17 Chi-square for Baseline Model : Degrees of Freedom 2.000000e+00
#> 18 Chi-square for Baseline Model : P-Value 0.000000e+00
#> 19 SRMR 5.648868e-06