PCA绘制标签和不同颜色

Question

我有一个相关矩阵，如下所示：

          A        B         C        D        E
A  1.00000000  0.08076432 -0.11462447 -0.10395283 -0.27033234
B   0.08076432  1.00000000 -0.05978118 -0.06478300 -0.11423989
C   -0.11462447 -0.05978118  1.00000000 -0.03884304 -0.09946262
D  -0.10395283 -0.06478300 -0.03884304  1.00000000  0.01411555
E  -0.27033234 -0.11423989 -0.09946262  0.01411555  1.00000000

我正在进行pca并绘制它（全部在R中）：

PCA<-princomp(cor_matrix)
names(PCA)
PCA$sdev
plot(PCA$scores[,1:2])

现在，我如何使用不同的颜色和图例进入标签。

谢谢

Answer 1

你可以做这样的事情

groups <- factor(rownames(PCA$scores))
plot(PCA$scores[,1:2], col=groups)
legend(0,0,groups, col=groups, pch=1)
text(PCA$scores[,1:2], labels=groups, pos=3)

这些都是基础绘图功能。您可能希望调整默认设置以使您的绘图看起来更漂亮。为此，请阅读每个功能的帮助页面。