如何解决在r中使用mice包时如何解决这个错误?
我正在尝试为一组分类和数值变量估算缺失值。 我使用的代码如下:
sapply(data,function(x) sum(is.na(x)))
library(dplyr)
data1 <- data %>%
mutate(
Age = as.numeric(Age),Sex = as.factor(Sex),BMI = as.numeric(BMI),Smoking = as.factor(Smoking),Alcohol = as.factor(Alcohol),HIV = as.factor(HIV),DM = as.factor(DM),Outcome = as.factor(Outcome),)
library(mice)
init = mice(data1,maxit=0)
meth = init$method
predM = init$predictorMatrix
meth[c("Age","BMI")]="norm"
meth[c("Sex","Smoking","Alcohol","HIV","DM","Outcome")]="logreg"
set.seed(123)
imputed = mice(data1,method=meth,predictorMatrix=predM,m=5)
imputed1 <- complete(imputed)
但我不断收到此错误:
iter 变量 1 1 AgeError in solve.default(xtx + diag(pen)) : 系统在计算上是奇异的:倒数条件数 = 8.07738e-24
有没有人对此有任何解决方案?
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。