## Not run:
# #############################################################################
# # EXAMPLE 1: Imputation of nhanes data and write imputed datasets on disk
# #############################################################################
#
# data(nhanes,package="mice")
#
# #**********
# # Model 1: Imputation using mice
# imp1 <- mice::mice( nhanes , m=3 , maxit=5 )
# # write results
# write.mice.imputation(mi.res=imp1 , name="mice_imp1" )
#
# #**********
# # Model 2: Imputation using mice.1chain
# imp2 <- mice.1chain( nhanes , burnin=10 , iter=20 , Nimp=4 )
# # write results
# write.mice.imputation(mi.res=imp2 , name="mice_imp2" )
# ## End(Not run)
Run the code above in your browser using DataLab