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