Interpretando o scree plot

Um critério bastante usado para definir o número ideal de fatores é considerar apenas fatores com autovalores maiores que 1. A função scree() inclui uma linha horizontal sólida em 1 no eixo y para ajudar você a interpretar rapidamente os resultados. Execute o código abaixo para recriar o scree plot usando os dados bfi_EFA que você criou no exercício anterior. Com base nos resultados, quantos fatores são recomendados?

# Calcular a matriz de correlações
bfi_EFA_cor <- cor(bfi_EFA, use = "pairwise.complete.obs")

# Usar a matriz de correlações para criar o scree plot
scree(bfi_EFA_cor, factors = FALSE)