# \donttest{
if (requireNamespace("INLA", quietly = TRUE)) {
library(ggplot2)
data(toydata)
result <- cheesepop(df = toydata$admin,output_dir = tempdir())
boxLine(dmat=result$male_age_pop,
xlab="Age group (years)",
ylab = "Population Count")
}
# }
Run the code above in your browser using DataLab