下表给出了全国28个省市19~22岁年龄组城市男生身体形态指标(身高、坐高
、体重
、胸围
、肩宽
、和盆骨宽
),数据在文末。试对这六个指标进行主成分分析。(该题来自《多元统计分析-基于R》费宇第六章课后习题)
读取数据,计算样本的相关系数矩阵R程序如下
d6.3<-read.csv("ex6.3.csv",header=T) #将ex6.7.csv中的数据读到R中
R=round(cor(d6.3[2:7]),3) #求样本相关系数矩阵,保留三位小数
R
symnum(cor(d6.3[2:7],use="complete.obs"))
相关系数矩阵:
可见 身高、坐高
、体重
、胸围