Zin in een waffle?

Wat als we geïnteresseerd zijn in de details van de klasse 'other'?

Laten we overstappen op een waffle chart, omdat die beter met meer klassen kan omgaan. We gebruiken dezelfde data-manipulatiepijplijn als in de vorige oefening, maar dit keer laten we alle ziektes erin.

We gebruiken de library waffle, die de functie waffle() bevat. Deze functie maakt een waffle chart voor je wanneer je een benoemde vector met aantallen meegeeft.

Er wordt één vierkant getekend voor elke eenheid in de vector, dus we moeten onze ziekte-aantallen omzetten naar afgeronde percentages (let op de mutate()-aanroep in de meegeleverde data-wranglingcode).

Deze oefening maakt deel uit van de cursus

Best practices voor visualisaties in R

Cursus bekijken

Oefeninstructies

Geef de case_counts-vector namen met de functie names().
Roep de functie waffle() uit de library waffle aan en geef de vector case_counts als argument mee.

Praktische interactieve oefening

Probeer deze oefening eens door deze voorbeeldcode in te vullen.

disease_counts <- who_disease %>%
group_by(disease) %>%
	summarise(total_cases = sum(cases)) %>% 
	mutate(percent = round(total_cases/sum(total_cases)*100))

# Create an array of rounded percentages for diseases.
case_counts <- disease_counts$percent
# Name the percentage array with disease_counts$disease
___

# Pass case_counts vector to the waffle function to plot
waffle(___)

Code bewerken en uitvoeren