pca in R

用R写pca：

x=data.frame(x1=c(1,0,6,2,7,8),x2=c(2,5,7,3,6,7),x3=c(3,6,7,2,9,0))
x=scale(x,center = T,scale = T)
xcov=cov(x)
xspe = eigen(xcov)  
xval = xspe$values
xvec = xspe$vec
rval=xval[-3]
rvec=xvec[,-3]
rx=x%*%rvec

pca是为了降维做的主成分分析，它利用向量的旋转，首先选取方差最大那个特征和特征向量的作为最重要的主成分，然后依次往下……，pca认为方差越大包含样本的信息越多，一般可以用累计方差贡献率来选取需要多少个主成分。

下次考虑用python复现pca。