Как получить вектор «пропорции отклонения» от princomp в R

Question

Это должно быть очень простым, и я надеюсь, что кто-то может мне помочь. Я провел анализ главных компонент со следующим вызовом:

pca <- princomp(....) 
summary(pca) 

Резюме PCA возвращает это описание:

      PC1 PC2  PC3 
Standard deviation  2.8788 2.7862 2.1845 
Proportion of Variance 0.1977 0.1549 0.07831 

Посмотрите на второй линии, которая показывает отклонение объяснена каждого ПК. Как я могу программно извлечь этот вектор в моем скрипте из переменной pca. Я сделал достаточно поиска и не могу найти ответ.

Answer 1

Процент вариации - это не что иное, как нормализованные стандартные отклонения. Вы можете рассчитать их как PoV <- pca$sdev^2/sum(pca$sdev^2)