Farkı görselleştirme: Batman ve Star Wars

Son egzersizde colors_joined'ı oluşturmuştun. Şimdi her renk (name) için bir çubuğun olduğu ve oranlardaki farkı gösteren bir çubuk grafik oluşturacaksın.

Faktörler ve görselleştirme bu kursun kapsamı dışında olduğundan, senin için bazı işlemleri yaptık: Videoda kullanılacak colors_joined tablosunu oluşturmak için yazılan kod aşağıda.

colors_joined <- batman_colors %>%
  full_join(star_wars_colors, by = "color_id", suffix = c("_batman", "_star_wars")) %>%
  replace_na(list(total_batman = 0, total_star_wars = 0)) %>%
  inner_join(colors, by = c("color_id" = "id")) %>%
  mutate(difference = fraction_batman - fraction_star_wars,
         total = total_batman + total_star_wars) %>%
  filter(total >= 200) %>%
  mutate(name = fct_reorder(name, difference))

Bu egzersiz

dplyr ile Veri Birleştirme

kursunun bir parçasıdır

Kursu Görüntüle

Egzersiz talimatları

Batman ve Star Wars temalarındaki en baskın renkleri göstermek için colors_joined tablosunu kullanarak, çubukları name ile renklendirilmiş bir çubuk grafik oluştur.

Uygulamalı interaktif egzersiz

Bu örnek kodu tamamlayarak bu egzersizi bitirin.

# Create a bar plot using colors_joined and the name and difference columns
ggplot(___, aes(___, ___, fill = ___)) +
  geom_col() +
  coord_flip() +
  scale_fill_manual(values = color_palette, guide = "none") +
  labs(y = "Difference: Batman - Star Wars")

Kodu Düzenle ve Çalıştır