情节PCA

  • Z时代
  • 2024-01-10
  • 分类：问答

我想知道我们该怎么做才能绘制个人超过第一和第二部分，像这样的所有组件：情节PCA

回答：

这可能工作：

pc.cr <- princomp(USArrests, cor = TRUE) 
pairs(pc.cr$loadings, col=c("red", "green", "blue"))

回答：

另一种选择是使用splom从lattice包。这里我用：

  1. splom矩阵散点图

  2. prcomp计算PCA

  3. mclustBIC到集群的数据。因为你需要按照一些标准对点进行分组。请注意，只给颜色只会回收col参数。

比如，你可以写：

library(lattice) 
library(mclust) 
dat <- iris[,1:4] 
dat.pca <- prcomp(iris[,1:4]) 
dat.em <- mclustBIC(dat) 
splom(as.data.frame(dat.pca$x), 
     col=summary(dat.em,data=dat)$classification, cex=2,pch='*')

以上是 情节PCA 的全部内容， 来源链接： utcz.com/qa/261397.html

回到顶部