Axa x categorică
În graficele anterioare, am observat că oreionul nu a început să fie raportat decât din 1999, ceea ce face ca comparațiile de dinainte de acest an să nu fie relevante.
Hai să filtrăm datele pentru a păstra doar cazurile raportate începând cu 1999, apoi să construim un grafic cu bare suprapuse care să arate proporția diferitelor boli pe regiuni.
Modifică pipeline-ul de manipulare a datelor pentru a obține forma dorită, apoi construiește și afișează graficul cu bare suprapuse! Nu te îngrijora de ordonarea barelor, așa cum am făcut în exercițiul anterior. Observi tipare surprinzătoare?
Acest exercițiu face parte din cursul
Cele mai bune practici de vizualizare în R
Instrucțiuni pentru exercițiu
- Filtrează datele
who_diseasepentru a păstra doar anii 1999 și ulterior. - Adaugă la
group_by()pentru a menține informațiile despreregionîn sumar. - Completează parametrii estetici cu
x = region,y = total_casesșifill = disease.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
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.
___(___)