земля все компоненты PCA

Question

я хотел бы знать, как мы можем сделать, чтобы построить человека в более, чем первый и второй компонент, как это:

Answer 1

Это может работать:

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

Answer 2

Другой вариант заключается в использовании 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='*')