Extraer la salida de la función principal en el paquete psych como un marco de datos

Cuando uso la función principal, como en el siguiente código, obtengo una buena tabla que proporciona todas las cargas estandarizadas, así como una tabla con los valores propios y la proporción y la proporción acumulada explicadas.

rotatedpca <- principal(PCFdataset, nfactors = 8, rotate = "varimax", scores = T)

Me gustaría exportar esta salida a un archivo de Excel (usando WriteXLS), pero solo puedo hacer eso para los marcos de datos, y rotatedpca no es un marco de datos y no se puede forzar a uno en lo que parece. Puedo extraer las cargas estandarizadas utilizando el siguiente código:

loadings<-as.data.frame(unclass(rotatedpca$loadings))

Pero no puedo averiguar cómo acceder a la otra información que normalmente se muestra cuando simplemente llamo la función principal, en particular los valores propios y la proporción y la varianza acumulada explicadas. Intenté los valores rotatedcpa $, pero eso devuelve lo que parecen los valores propios de las 12 variables originales como factores sin rotación, lo cual no entiendo. Y no he podido averiguar de ninguna manera ni siquiera intentar extraer los valores explicados de la varianza. ¿Cómo puedo simplemente crear un marco de datos que se parece a la salida R que obtengo a continuación de la función principal, por ejemplo?

                       RC2  RC3  RC8  RC1  RC4  RC5  RC6  RC7
SS loadings           1.52 1.50 1.45 1.44 1.01 1.00 0.99 0.98
Proportion Var        0.13 0.12 0.12 0.12 0.08 0.08 0.08 0.08
Cumulative Var        0.13 0.25 0.37 0.49 0.58 0.66 0.74 0.82
Proportion Explained  0.15 0.15 0.15 0.15 0.10 0.10 0.10 0.10
Cumulative Proportion 0.15 0.31 0.45 0.60 0.70 0.80 0.90 1.00

¡Gracias por leer mi publicación!

Respuestas a la pregunta(2)

Su respuesta a la pregunta