I have created a histogram, but I would like to order the bars by desc
mediatweets%>%
ggplot( aes(screen_name, as.numeric(count))) +
  geom_col(fill = 'firebrick') + 
  theme_minimal(base_size = 14) +
  xlab(NULL) + ylab(NULL) +
  geom_text(aes(label = count, y = count+15), position = position_dodge(0.9), vjust =0.5,size=3)+
  scale_x_discrete(limits = mediatweets$screen_name) + coord_flip()+
  ggplot2::labs(
    x = NULL, y = NULL, #Info en cada eje 
    title = "Tweets sobre el COVID-19 por día" #Texto 
  )
