I am having difficulty changing the y-axis legend in the code below. I would be grateful if someone could help me.
grafico=ggplot(taxocenose, aes(x= reorder(Taxa, -Total), y= Total)) + geom_bar(stat = "identity", width = .55, fill=gray(.2))+ scale_y_continuous(limits = c(0,40), breaks = seq(0,40,5)) + theme_classic(base_size = 16) + xlab(NULL) + ylab("Occurrence in the articles analyzed")
grafico2= grafico + geom_col(position = position_dodge()) + theme(axis.text.x = element_text(angle = 40, hjust = 1, colour = 'black', family= "serif"), axis.text.y = element_text(colour = 'black', family= "serif"))