R中的多元相关矩阵

时间:2018-03-12 10:24:28

标签: r

我非常希望得到以下帮助 - 我有这个SPSS数据集(.sav),我已经测试了22个项目的比例(Likert,来自&#34的5个选项;完全不同意"到&# 34;完全同意")。我有1,500名受访者,我想在该计划中做一个多媒体相关矩阵。

我已经阅读了一些有关此内容的帖子,但似乎没有做到这一点。我已将我的22个项目命名为" item1,item2,item3 ...",并且值为0,1,2,3或4。 我已经安装了" psych"和#34; polycor"封装

请帮忙! 非常感谢提前!

1 个答案:

答案 0 :(得分:1)

尝试调整此代码:

您的数据

item<-paste0("item",seq(0,22,1))
df<-data.frame(item=rep(item,1000),
               values=round(runif(1000,0,4),0))
head(df)
   item values
1 item0      1
2 item1      1
3 item2      3
4 item3      1
5 item4      0
6 item5      4

创建相关矩阵

groups = unique(df$item)
cor_matrix<-sapply(1:length(groups), function(i)
  sapply(1:length(groups), function(j)
    cor(x = df$values[df$item == groups[i]], y = df$values[df$item == groups[j]])))

绘制相关矩阵

corrplot(cor_matrix, type = "upper", order = "hclust", 
         tl.col = "black", tl.srt = 45) #Visual approach

corrplot(cor_matrix, method = "number", col = "black", cl.pos = "n") #Numeric approach