De beruchte P-I-E

Intuïtief kun je een cirkeldiagram zien als een gestapeld staafdiagram dat om een centrale as is ‘gewikkeld’. Handig genoeg sluit die intuïtie goed aan bij hoe je ze maakt in ggplot2.

Er is code meegegeven om onze who_disease-data samen te vatten tot een data frame met drie ziekten: measles, mumps en other, samen met hun totale aantal gevallen in de data.

Jouw taak is om het lege ggplot-object eerst om te vormen tot een gestapeld staafdiagram, en daarna tot een cirkeldiagram met de transformatie coord_polar(theta = 'y').

Let op dat ik x = 1 in de aesthetics heb gezet. Dat is omdat we hier maar één staafdiagram willen. In de volgende les leren we over meerdere gestapelde staafdiagrammen!

Deze oefening maakt deel uit van de cursus

Best practices voor visualisaties in R

Cursus bekijken

Oefeninstructies

Voeg een kolomgeometrie (geom_col()) toe aan het meegeleverde ggplot-object.
Schakel over naar poolcoördinaten door coord_polar() toe te voegen.

Praktische interactieve oefening

Probeer deze oefening eens door deze voorbeeldcode in te vullen.

# Wrangle data into form we want. 
disease_counts <- who_disease %>%
	mutate(disease = ifelse(disease %in% c('measles', 'mumps'), disease, 'other')) %>%
	group_by(disease) %>%
	summarise(total_cases = sum(cases))

ggplot(disease_counts, aes(x = 1, y = total_cases, fill = disease)) +
	# Use a column geometry.
	___ 
	# Change coordinate system to polar and set theta to 'y'.
	___

Code bewerken en uitvoeren