## Not run:
# rm(list=ls())#clean the workspace
#
# data<-mtcars
# require(CorReg)
# datamiss=Terminator(target = data,wrath=0.05)#5% of missing values
# showdata(datamiss)#plot positions of the missing values
# datamiss=Terminator(target = data,diag=1)#diag of missing values
# showdata(datamiss)#plot positions of the missing values (no full individuals, no full variable)
# ## End(Not run)
Run the code above in your browser using DataLab