En el último ejercicio, creaste colors_joined. Ahora crearás un gráfico de barras con una barra para cada color (name), mostrando la diferencia en fracciones.

Dado que los factores y la visualización están fuera del alcance de este curso, hemos hecho algo de procesamiento para usted: aquí está el código que creó la tabla colors_joined que se utilizará en el vídeo.

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

Visualización de las diferencias entre conjuntos

Create Your Free Account