IniziaInizia gratis

Visualizzare la differenza: Batman e Star Wars

Nell'ultimo esercizio, hai creato colors_joined. Ora creerai un grafico a barre con una barra per ogni colore (name), che mostri la differenza tra le frazioni.

Poiché fattori e visualizzazione esulano dallo scopo di questo corso, abbiamo fatto un po' di lavoro per te: ecco il codice che ha creato la tabella colors_joined che verrà usata nel video.

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

Questo esercizio fa parte del corso

Unire i dati con dplyr

Visualizza il corso

Istruzioni dell'esercizio

  • Crea un grafico a barre usando la tabella colors_joined per mostrare i colori più presenti nei temi Batman e Star Wars, colorando le barre in base al loro name.

Esercizio pratico interattivo

Prova a risolvere questo esercizio completando il codice di esempio.

# 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")
Modifica ed esegui il codice