# NOT RUN {
if (interactive()) {
mtdi_gen <- hyper_mtdi_lognormal(CV = 1
                                ,median_mtd = 5
                                ,median_sdlog = 0.5
                                ,units="mg/kg")
plot(mtdi_gen, n=100, col=adjustcolor("red", alpha=0.5))
} 
# }
Run the code above in your browser using DataLab