Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/silverlight/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 带有标签和不同颜色的PCA图_R_Pca - Fatal编程技术网
Fatal编程技术网
  • r/
  • R 带有标签和不同颜色的PCA图

R 带有标签和不同颜色的PCA图

r

R 带有标签和不同颜色的PCA图,r,pca,R,Pca,我有一个相关矩阵，看起来像这样： 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.0994

我有一个相关矩阵，看起来像这样：

          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你可以这样做


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)



组

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)