Temel yığılmış çubuklar
Son egzersizlerde pasta ve waffle grafiklerini yaparken, verideki tüm yılları birleştirip birlikte incelemiştik.
Şimdi, bu desenlere zaman içinde bakmak istiyoruz. Bunu yapmak için x-ekseni gözlem yılı olacak şekilde bir yığılmış çubuk grafik oluşturacağız. Daha önce pasta grafikte yaptığımız gibi, veriyi sadece measles, mumps ve other olarak basitleştireceğiz.
Bu şekilde görselleştirdikten sonra veride gözüne tuhaf gelen bir şey oluyor mu?
Bu egzersiz
R'de Görselleştirme En İyi Uygulamaları
kursunun bir parçasıdırEgzersiz talimatları
aes()çağrısını, x-ekseniyle eşlenecek şekilde yılı da içerecek biçimde değiştir.geom_col()içindekipositionargümanını ayarlayarak çubukların tüm y-ekseni alanını doldurmasını sağla.
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
disease_counts <- who_disease %>%
mutate(disease = ifelse(disease %in% c('measles', 'mumps'), disease, 'other')) %>%
group_by(disease, year) %>% # note the addition of year to the grouping.
summarise(total_cases = sum(cases))
# add the mapping of year to the x axis.
ggplot(disease_counts, aes(___, y = total_cases, fill = disease)) +
# Change the position argument to make bars full height
geom_col(___)