我进行了一项调查,以找出哪种是首选的废物管理服务模式。受访者需要从10个可能的选项中选择1个。所有受访者的所有选项均相同,其顺序也相同。
有5个因素,每个因素有2个水平
完整数据库:https://drive.google.com/file/d/1wb9finbvKAa61_ohQXIKhKXcOO4-5QLy/view?usp=sharing
我的密码
cbc <- read.csv("/Users/danielfortes/Downloads/respostasurvey.csv", header = TRUE)
summary(cbc)
xtabs(choice ~ A, data = cbc)
xtabs(choice ~ B, data = cbc)
xtabs(choice ~ C, data = cbc)
xtabs(choice ~ D, data = cbc)
xtabs(choice ~ E, data = cbc)
library(mlogit)
cbc.mlogit <- mlogit.data(data=cbc, choice = "choice", shape = "long", varying = 3:7, alt.levels = paste("pos",1:10), id.var ="resp.id")
mlog <- mlogit(choice ~ 0 | A + B + C + D + E, data = cbc.mlogit)
Code Error:
Error in solve.default(H, g[!fixed]) :
system is computationally singular: reciprocal condition number = 2.53749e-17
变化的数据是否正确? (3:6)
我已经尝试了其他一些不同的数据
我已经将mlog更改为以下内容,然后发生了后续错误
mlog <-mlogit(选择〜0 | A + B + C + D + E,数据= cbc.mlogit)
solve.default(H,g [!fixed])中的错误: Lapack例行程序dgesv:系统完全是单数:U [10,10] = 0
有人可以帮助我吗?我真的很感激:)