一个程序:
require(graphics)
pr <- prcomp(USArrests) #实现pca
#pr <- princomp(USArrests)
pr$sdev #特征值
pr$rotation #对应特征向量
一个程序:
require(graphics)
pr <- prcomp(USArrests) #实现pca
#pr <- princomp(USArrests)
pr$sdev #特征值
pr$rotation #对应特征向量