首页 > 解决方案 > 将 KMO 的输出转换为矩阵

问题描述

我正在尝试创建一个 KMO 输出到矩阵以将其保存在 excel 文件中

例如:


QUEST <- data.frame(
  Q1=c(1,5,2,3,4,2,3,4,3,2), 
  Q2=c(2,4,1,2,4,1,2,5,2,1), 
  Q3=c(2,5,1,3,3,2,2,4,2,2))
#install.packages("psych")
library(psych)
T1 <- cor(QUEST)
T2 <- KMO(T1)

现在我希望 T2 输出应该是矩阵,以便我可以将其保存在 excel 文件中,请帮助

标签: r

解决方案


来自help(KMO)

细节

令 S^2 = diag(R^{-1})^{-1} 和 Q = SR^{-1}S。则称 Q 为反图像互相关矩阵。

...

Image 图像相关矩阵 (Q)

打印“反图像相关矩阵”:

T2$Image
#           Q1         Q2         Q3
#Q1  1.0000000 -0.3514537 -0.5093882
#Q2 -0.3514537  1.0000000 -0.4930078
#Q3 -0.5093882 -0.4930078  1.0000000

或将其写入 Excel:

library(openxlsx)
openxlsx::write.xlsx(T2$Image,"Matrix.xlsx")

推荐阅读