请教如下程序是怎么回事？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

library(rpart)
data(car.test.frame, na.strings="NA")
library(FactoMineR)
##选择两个补充变量，一个数量变量，一个分类变量
res.mca=MCA(car.test.frame, quanti.sup=7, quali.sup=2)
Error in dimnames(res) <- list(attributes(tab)$row.names, listModa) :
  length of 'dimnames' [2] not equal to array extent

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：Library strings string Frame BRARY 程序

"car.test.frame"中包含的列变量类型未转换成factor类型

需将数据列均准换成factor类型，并用missMDA包的函数处理缺失值，具体代码如下：
#将向量转换成factor
data(car.test.frame,package="rpart")
library(FactoMineR)
test=car.test.frame
test[,1]=factor(test[,1])
test[,3]=factor(test[,3])
test[,4]=factor(test[,4])
test[,6]=factor(test[,6])
test[,7]=factor(test[,7])
test[,8]=factor(test[,8])
#处理缺失值
require(missMDA)
completed<-imputeMCA(test,ncp=2)
res.mca <- MCA(test,tab.disj=completed$tab.disj)