Asse x categorico
Nei grafici precedenti abbiamo visto che la parotite (mumps) ha iniziato a essere riportata solo dal 1999, quindi i confronti precedenti non hanno senso.
Filtriamo i dati per includere solo i casi riportati dal 1999 in poi e poi creiamo un grafico a barre impilate che mostri la proporzione delle diverse malattie per regione.
Modifica la pipeline di manipolazione dei dati per ottenere il formato desiderato, quindi costruisci il grafico a barre impilate e traccialo! Non preoccuparti di ordinare le barre come nel precedente esercizio. Noti qualche pattern sorprendente?
Questo esercizio fa parte del corso
Buone pratiche di visualizzazione in R
Istruzioni dell'esercizio
- Filtra i dati
who_diseaseper includere solo gli anni dal 1999 in avanti. - Aggiungi a
group_by()per mantenere l’informazioneregionnel riepilogo. - Compila le estetiche con
x = region,y = total_casesefill = disease.
Esercizio pratico interattivo
Prova a risolvere questo esercizio completando il codice di esempio.
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.
___(___)