# NOT RUN {
## in case there is no assumed missingness pattern per variable
# wrap <- impute_simulated(rownum = metadata$Rows,
# colnum = metadata$Columns,
# cormat = metadata$Corr_matrix,
# MD_pattern = metadata$MD_Pattern,
# NA_fraction = metadata$Fraction_missingness,
# min_PDM = 10,
# n.iter = 50)
## in case there is a pre-defined assumed pattern
# wrap <- impute_simulated(rownum = metadata$Rows,
# colnum = metadata$Columns,
# cormat = metadata$Corr_matrix,
# MD_pattern = metadata$MD_Pattern,
# NA_fraction = metadata$Fraction_missingness,
# min_PDM = 10,
# assumed_pattern = c('MAR','MAR','MCAR','MCAR',
# 'MNAR','MCAR','MAR','MNAR',
# 'MCAR','MNAR','MCAR'),
# n.iter = 50)
# }
Run the code above in your browser using DataLab