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