Basis gestapelde staven
Toen we in de vorige oefeningen de cirkel- en wafelgrafieken maakten, keken we naar alle jaren in de data samengenomen.
Nu willen we deze patronen over de tijd bekijken. Dat doen we met een gestapelde staafdiagram waarbij de x-as het waarnemingsjaar is. Net als bij de cirkeldiagram vereenvoudigen we de data naar alleen measles, mumps en other.
Valt je iets geks op in de data als je het op deze manier visualiseert?
Deze oefening maakt deel uit van de cursus
Best practices voor visualisaties in R
Oefeninstructies
- Pas de
aes()-aanroep aan zodat het jaar aan de x-as wordt gekoppeld. - Laat staven de volledige y-as vullen door het
position-argument ingeom_col()aan te passen.
Praktische interactieve oefening
Probeer deze oefening eens door deze voorbeeldcode in te vullen.
disease_counts <- who_disease %>%
mutate(disease = ifelse(disease %in% c('measles', 'mumps'), disease, 'other')) %>%
group_by(disease, year) %>% # note the addition of year to the grouping.
summarise(total_cases = sum(cases))
# add the mapping of year to the x axis.
ggplot(disease_counts, aes(___, y = total_cases, fill = disease)) +
# Change the position argument to make bars full height
geom_col(___)