Tonelajes exportados por mercancía en 2024

Una de las preguntas que nos podemos hacer, es ¿Cuál fue el tonelaje total exportado para cada mercancía en el puerto de Avilés en 2024?.

puerto_aviles_17 %>%
filter(`Fecha Entrada` >= "2024-01-01" & `Fecha Entrada` <= "2024-12-31") %>%
filter(Operación == "Embarque") %>%
group_by(Mercancia) %>%
summarise(Tonelaje = sum(Tonelaje)) %>%
ggplot(aes(x = fct_reorder(Mercancia, Tonelaje), y = Tonelaje, fill = Mercancia)) +
geom_col(show.legend = FALSE) +
geom_text(aes(label = scales::comma(Tonelaje)),
size = 3, color = "black", vjust = 0.4, position = position_stack(vjust = 1)) +
coord_flip() +
labs(x = "Mercancia embarcada (2024)", y = "Tonelaje", title = "Tonelaje total embarcado en 2024") +
theme_minimal()

Podéis hacer click en el gráfico para verlo en grande, pero claramente el mayor tonelaje es el de bobinas de acero, seguido del abono, arcilla y ácido sulfúrico.