# 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