powered by
Non Graphical Cattell's Scree Test
.n_factors_scree(eigen_values = NULL, model = "factors")