Categorische x-as

In de vorige grafieken zagen we dat bofgevallen pas vanaf 1999 werden gerapporteerd, waardoor vergelijkingen van vóór die tijd betekenisloos zijn.

Laten we de gegevens filteren tot alleen de gevallen die in of na 1999 zijn gerapporteerd en vervolgens een gestapelde staafdiagram maken om naar de verhoudingen van verschillende ziekten per regio te kijken.

Pas de datamanipulatie-pijplijn aan zodat de gegevens de juiste vorm krijgen, en bouw daarna je gestapelde staafdiagram en plot! Maak je hier geen zorgen om de volgorde van de staven, zoals in de vorige oefening. Zie je verrassende patronen?

Deze oefening maakt deel uit van de cursus

Best practices voor visualisaties in R

Cursus bekijken

Oefeninstructies

Filter who_disease tot alleen jaren 1999 en later.
Voeg toe aan group_by() om region in de samenvatting te behouden.
Vul de esthetiek in met x = region, y = total_cases en fill = disease.

Praktische interactieve oefening

Probeer deze oefening eens door deze voorbeeldcode in te vullen.

disease_counts <- who_disease %>%
	# Filter to on or later than 1999
	filter(___) %>% 
	mutate(disease = ifelse(disease %in% c('measles', 'mumps'), disease, 'other')) %>%
	group_by(disease, ___) %>%    # Add region column to grouping
	summarise(total_cases = sum(cases))

# Set aesthetics so disease is the stacking variable, region is the x-axis and counts are the y
ggplot(disease_counts, aes(___)) +
	# Add a column geometry with the proper position value.
	___(___)

Code bewerken en uitvoeren