
mi.continuous(formula, data = NULL, start = NULL, maxit = 100,
draw.from.beta = TRUE, missing.index = NULL, ...)
mi.info
,
mi.method
,
mi
# true data
x<-rnorm(100,0,1) # N(0,1)
y<-rnorm(100,(1+2*x),1.2) # y ~ 1 + 2*x + N(0,1.2)
# create artificial missingness on y
y[seq(1,100,10)]<-NA
dat.xy <- data.frame(x,y)
# imputation
mi.continuous(y~x, data = dat.xy)
Run the code above in your browser using DataLab