我使用了另一个程序来估算数据中的缺失
.imp在csv文件中编码为X_mult _
将X_mult_列转换为.imp并制作.id列之后,我尝试了as.mids()函数,但r表示“未找到原始数据。”
所以我再次尝试使用此代码,但是R说“替换有26行,数据有27行”,这意味着db中仍然没有NA
但是如何在没有NA的情况下合并原始数据?
请帮助我...
org <- read.csv("Final_Study_Subject.csv", header=T)
fss <- read.csv("Final_Study_Subject_IMPUTE.csv", header=T)
org$.imp <- rep(0, 2546)
fss$.imp <- fss$X_mult_
fss<- fss[,-c(25)]
str(org)
a<-rbind(org, fss)
str(a)
a$ID <- as.numeric(a$ID)
a$.id <- a$ID
a <- a[,-c(1)]
a <- a[, c(32,33,1:31)]
str(a)
c <-as.mids(a)