Visualise age pyramids

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.height = 10,
  fig.width = 10
)
library(contactdata)

In this vignette, we are going to try to visualise the age pyramid for 9 Western Europe countries. The list of these countries is:

countries <- c("Portugal", "Spain", "Italy", "France", "Ireland", "Belgium", "Luxembourg", "Germany", "Switzerland")

We can get the contact data for all these countries in a single function call with:

age_data <- age_df_countries(countries)

For the visualisation itself, we use the graphical package ggplot2, which offers a large flexibility in terms of customisation:

library(ggplot2)
ggplot(age_data, aes(x = population, y = age)) + 
  geom_bar(stat = "identity") +
  facet_wrap(~ country, scales = "free")


Try the contactdata package in your browser

Any scripts or data that you put into this service are public.

contactdata documentation built on Feb. 19, 2021, 9:06 a.m.