Legendarny wykres kołowy
Wykres kołowy możesz intuicyjnie traktować jako skumulowany wykres słupkowy „zawinięty" wokół centralnej osi. Ta intuicja doskonale oddaje sposób, w jaki tworzy się go w ggplot2.
Dostarczony kod podsumowuje dane who_disease do ramki danych zawierającej trzy choroby: measles, mumps oraz other, wraz z łączną liczbą przypadków w zbiorze danych.
Twoim zadaniem jest przekształcenie pustego obiektu ggplot najpierw w skumulowany wykres słupkowy, a następnie w wykres kołowy za pomocą transformacji coord_polar(theta = 'y').
Zwróć uwagę, że w estetyce ustawiłem x = 1. Wynika to z tego, że chcemy tu tylko jednego wykresu słupkowego. Skumulowanych wykresów słupkowych dla wielu kategorii nauczysz się w kolejnej lekcji!
To ćwiczenie jest częścią kursu
Najlepsze praktyki wizualizacji danych w R
Instrukcje do ćwiczenia
- Dodaj geometrię kolumnową (
geom_col()) do dostarczonego obiektu ggplot. - Przełącz się na współrzędne biegunowe, dodając
coord_polar().
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
# 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'.
___