这应该是非常基本的,希望有人能帮助我。我通过以下调用运行了主成分分析:
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
请看第二行,该行显示了每台PC解释的方差。如何以编程方式从变量pca中提取此向量。我已经进行了足够的搜索,无法找到答案。
方差比例仅是归一化标准差。您可以将它们计算为PoV <- pca$sdev^2/sum(pca$sdev^2)
仅:
summary(pc)$importance[2,]