Kategoryczna oś X
Na poprzednich wykresach zauważyliśmy, że świnka (mumps) zaczęła być raportowana dopiero od 1999 roku, co sprawia, że wcześniejsze porównania nie mają sensu.
Przefiltrujmy dane tak, aby uwzględniały tylko przypadki zgłoszone w 1999 roku i później, a następnie stwórzmy skumulowany wykres słupkowy pokazujący udział poszczególnych chorób w różnych regionach.
Zmodyfikuj potok przetwarzania danych, aby uzyskać odpowiedni format, a następnie zbuduj i wyświetl skumulowany wykres słupkowy. Nie przejmuj się tu kolejnością słupków – tak jak robiliśmy w poprzednim ćwiczeniu. Czy widzisz jakieś zaskakujące wzorce?
To ćwiczenie jest częścią kursu
Najlepsze praktyki wizualizacji danych w R
Instrukcje do ćwiczenia
- Przefiltruj dane
who_disease, aby uwzględniały tylko lata 1999 i późniejsze. - Dodaj do
group_by()kolumnęregion, aby zachować informacje o regionach w podsumowaniu. - Uzupełnij estetyki:
x = region,y = total_casesorazfill = disease.
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
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.
___(___)