Ordenar el apilado para mejorar la lectura

En el último gráfico, como agrupamos todas las enfermedades que no son sarampión ni paperas en su propia categoría, es razonable suponer que nos preocupa menos la trayectoria de la categoría "other" que la de sarampión y paperas.

Por eso, el gráfico que hicimos tiene un problema. La forma en que están apiladas las barras —con sarampión arriba, paperas en el medio y other abajo— dificulta intuir bien el comportamiento de paperas a lo largo del tiempo, porque su línea de base no es constante debido a los cambios en las proporciones de sarampión.

Ggplot ordena las barras y la leyenda según el orden en que ve las variables en el conjunto de datos. Para evitar esto, convierte la columna de enfermedad en un factor con los levels en el orden en que queremos que nuestro gráfico los use.

Este ejercicio forma parte del curso

Buenas prácticas de visualización en R

Ver curso

Instrucciones del ejercicio

Cambia la función mutate en la canalización de manipulación de datos para convertir disease en un factor con levels = c('measles', 'other', 'mumps').
Vuelve a graficar usando el mismo código que en el ejercicio anterior.

Ejercicio interactivo práctico

Prueba este ejercicio y completa el código de muestra.

disease_counts <- who_disease %>%
	mutate(
		disease = ifelse(disease %in% c('measles', 'mumps'), disease, 'other') %>% 
		factor(___) # change factor levels to desired ordering
	) %>%
	group_by(disease, year) %>%
	summarise(total_cases = sum(cases)) 

# plot
ggplot(disease_counts, aes(x = year, y = total_cases, fill = disease)) +
	geom_col(position = 'fill')

Editar y ejecutar código