主成分分析R语言.pdf

文档介绍：第一题
> data=("",head=T)
> head(data)#前六行数据
- -
铅球 -
跳高 - - -
400 米 - -
110 米跨栏 -
铁饼 - -
撑杆跳高 - -
标枪 - -
1500 米 - -
方差贡献率
累积方差贡献率

解释：前三个主成分解释了大部分信息；第一次主成分测量的是综合运动能力，第二个主成
分代表了爆发力臂力，第三主成分测量的是爆发性腿力。
附录：这是 psych 软件包中计算主成分的结果，主成分载荷与 princomp 得到的结果有很大的差
异，并且这个结果似乎更容易解释
第二题
> library(RODBC)
> data=odbcConnectExcel("G:/R/")
> data1=sqlFetch(data,"Sheet1")
> close(data) #关闭通道
> attach(data1)
> head(data1)#查看前六行数据
> data2=data1[,-1]#去掉第一列数据
> options(digits=2) #数据均保留小数点后两位
> q2<-princomp(data2,cor=T) #用相关系数矩阵做主成分分析
> options(digits=2) #数据均保留小数点后两位
> summary(q2)