## Not run:
# data<-mtcars
# require(CorReg)
# datamiss=Terminator(target = data,wrath=0.05)#5% of missing values
# showdata(datamiss)#plot positions of the missing values
#
# #missing values with a structure
# datamiss=Terminator(target = data,diag=1)#diag of missing values
# showdata(datamiss)#plot positions of the missing values (no full individuals, no full variable)
#
# opar=par(no.readonly = TRUE)
# showdata(X=cor(data),what="correl")
# par(opar)
#
# ## End(Not run)
Run the code above in your browser using DataLab