Kategorik x ekseni
Önceki grafiklerde, kabakulak vakalarının 1999'a kadar raporlanmadığını gördük; bu da ondan önceki karşılaştırmaları anlamsız kılıyor.
Veriyi yalnızca 1999 ve sonrasında raporlanan vakalarla filtreleyelim ve ardından bölgelere göre farklı hastalıkların oranlarına bakan yığılmış bir çubuk grafik oluşturalım.
Veriyi istediğin forma getirmek için veri işleme hattını (pipeline) düzenle, sonra yığılmış çubuk grafiğini oluştur ve çiz! Son egzersizde yaptığımız gibi çubukların sırasıyla uğraşmana gerek yok. Sence şaşırtıcı desenler var mı?
Bu egzersiz
R'de Görselleştirme En İyi Uygulamaları
kursunun bir parçasıdırEgzersiz talimatları
who_diseaseverisini yalnızca 1999 ve sonrasındaki yıllara filtrele.- Özette
regionbilgisini tutmak içingroup_by()'a ekleme yap. - Estetiklerde
x = region,y = total_casesvefill = diseasekullan.
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
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.
___(___)