所用的数据:
X <- iris[,1:4]
tX <- t(X)
第一种plot做法: 我自己觉得应该是这么做的
x11()
X.new <- prcomp(X)$x
plot(X.new[,1:2])
text(X.new[,1:2], labels=1:nrow(X.new))
第二种plot做法: 很多人是这么做的
x11()
tX.rot <- prcomp(tX)$rotation
plot(tX.rot[,1:2])
text(tX.rot[,1:2], labels=1:nrow(tX.rot))
从效果上看, 两种做法都可以将数据分成不同的组. 但我拿不准哪一种更合理一些?
