因子分析——主成份算法实现补充

 补充内容:R自带函数,测试数据,因子评分

数据文件(点击无效则复制下面URL到迅雷下载)

http://files.cnblogs.com/files/panpansky/%E4%B8%BB%E5%9B%A0%E5%AD%90%E5%88%86%E6%9E%90%E8%A1%A5%E5%85%85%E6%95%B0%E6%8D%AE.rar

 

测试事例:

rt<-read.table("applicant.data")//绝对路径
factanal(~., factors=5, data=rt)
/*factanal(x, factors, data = NULL, covmat = NULL, n.obs = NA,
subset, na.action, start = NULL,
scores = c("none", "regression", "Bartlett"),
rotation = "varimax", control = NULL, ...)*/参数说明

分析结果:

                        

                          

 

直接上代码:

rt<-read.table("applicant.data")
//scores="regression"为回归法分析,scores="Bartlett"为最小二乘法分析
fa<-factanal(~., factors=5, data=rt, scores="regression")
//画出两个因子的联系图

plot(fa$scores[, 1:2], type="n")
text(fa$scores[,1], fa$scores[,2])

 

PS:本文涉及资料均来自薛毅书《统计建模与R语言》P543~546

 

转载于:https://www.cnblogs.com/panpansky/p/4609581.html

  • 0
    点赞
  • 0
    收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
©️2022 CSDN 皮肤主题:编程工作室 设计师:CSDN官方博客 返回首页
评论
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值