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, kursun bir parçasıdır
R'de Görselleştirme En İyi Uygulamaları
Egzersiz 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ı etkileşimli egzersiz
Bu egzersizi bu örnek kodu tamamlayarak deneyin.
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.
___(___)