1. Učit se
  2. /
  3. Kurzy
  4. /
  5. Joining Data with dplyr

Connected

Cvičení

Vizualizace rozdílu: Batman a Star Wars

V předchozím cvičení jsi vytvořil/a tabulku colors_joined. Teď vytvoříš sloupcový graf s jedním sloupcem pro každou barvu (name), který znázorní rozdíl ve frakcích.

Protože faktory a vizualizace jsou nad rámec tohoto kurzu, část zpracování jsme udělali za tebe: zde je kód, který vytvořil tabulku colors_joined použitou ve videu.

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)) 

Pokyny

100 XP
  • Pomocí tabulky colors_joined vytvoř sloupcový graf zobrazující nejvýraznější barvy v tématech Batman a Star Wars, přičemž sloupce obarvi podle jejich name.