# NOT RUN {
# Generate a suppression dataset where M.2 is suppressed
sup <- generateMed(n = 100,
a = c(-0.4, 0.4),
b = c(0.8, 0.48),
Sigma = matrix(c(1, -0.6, -0.6, 1), 2))
# }
Run the code above in your browser using DataLab