R 中对应分析的列联表:“'dimnames' [2] 的长度不等于数组范围”

问题描述

我有一个关于 R 中对应分析列联表的非常具体的问题。在执行最后一个命令后,我收到以下错误

"dimnames(res) 中的错误

真正奇怪的是,一位同事使用完全相同的数据运行了完全相同的代码并收到了相同的错误,但她可以继续使用输出。虽然没有错误会更好,但如果有结果继续工作已经有很大帮助了。

我使用的代码是:

df = read.csv("C://Users//Max//Documents//Master//Multivariate Statistical 
Analysis\\MaximillianSuliga.csv",header=TRUE)
summary(df)
dff <- aggregate(n~ a+b+c,data=df,FUN = "sum") 
dff

counts <- c(dff$n) 
dimn <- list(a=c("<=1.2",">1.2"),b=c("<=3",">3"),c=c("jusu","magra"))


contingencytable <- as.table(array(counts,dim=c(2,2,2),dimnames=dimn)) 

contingencytable
summary(contingencytable)




mca1 = ftable(contingencytable,col.vars = "c") 
mca1



library("FactomineR")
library("factoextra")
library("ca")




cats = apply(contingencytable,1,function(x) nlevels(as.factor(x))) 
cats2 = apply(contingencytable,function(x) nlevels(as.factor(x))) 

cats
cats2


#mca1 <- as.matrix(mca1) #according to the Web this should help,has not in my case
#mca1 = as.data.frame.matrix(mca1) 


mca1 = CA(contingencytable,graph = TRUE) #not sure whether a single or a multiple CA is suitable for 
this data,according to theory it should be Multiple,mca1 = MCA(contingencytable,graph = TRUE) #in tutorials that use data from the libraries (like 
caith),single CA has also worked with three dimensions    

据我所知,我无法在此处上传数据。这不会有问题,因为它只是人工数据,但也许结构足以让您理解。截图如下:

The output given from the "summary(df)" command

我该怎么做才能使代码正常工作?收到错误消息是正常的还是可以的,因为我的同事虽然收到了输出,但也是如此?我可以假设她收到的输出(这意味着上面的代码)是正确的吗? CA 和 MCA 命令是一样的,我想对于我的数据,简单和多个 CA 产生相同的结果。

谢谢。

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)