efa_mod <- EFA(test_models$baseline$cormat, N = 500, n_factors = 3,
type = "EFAtools", method = "PAF", rotation = "promax")
rel <- efa_reliability(efa_mod)
rel
# format() returns the same lines as plain text:
writeLines(format(rel))
Run the code above in your browser using DataLab