楼主: 风味1991
4880 0

[程序分享] R进行主成分分析(pca)代码 [推广有奖]

  • 0关注
  • 0粉丝

本科生

79%

还不是VIP/贵宾

-

威望
0
论坛币
284 个
通用积分
0
学术水平
6 点
热心指数
11 点
信用等级
7 点
经验
7526 点
帖子
97
精华
0
在线时间
94 小时
注册时间
2016-3-4
最后登录
2024-2-22

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
#文件在桌面,名为“seventeen_types.csv”,第一行为标题行
data <- read.csv('C:/Users/admin/Desktop/,header=T)
data
#pca分析
#cor=T时,输入矩阵为相关系数矩阵,每个元素是0<=x<=1的,对角线为1;
#cor=F时,输入矩阵为协方差矩阵,对角线为每个变量的方差;
#默认是cor=F的,而相关数矩阵就相当于先将数据标准化,然后再求协方差矩阵。
#将数据标准化,两种方式才是相同的。否则,cor=T比cor=F相当于多一个标准化过程。
type.pr<- princomp(data,cor=T)
#显示结果
summary(type.pr,loadings=T)
#预测,显示各样本主成份的值
pca_data <- predict(type.pr)
pca_data
#显示碎石图
screeplot(type.pr,type="lines")
#主成分分析散点图
biplot(type.pr)

知识肤浅,如有错误请各位不吝指正
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:主成分分析 主成分 pca Seventeen Types

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-5-2 03:20