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.