### NOT RUN
#========================================================
#  data(CHAIN)
#  imp.CHAIN <- mi(CHAIN, n.iter=6, add.noise=FALSE)
#  plot(imp.CHAIN)
#========================================================Run the code above in your browser using DataLab