Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ggplot(areas, aes(x = RETAILER, y = Difference), label=sprintf("%0.2f", round(areas$Difference, digits = 2))) +
- geom_bar(stat = "identity", aes(fill = RETAILER), colour = "black") +
- scale_y_continuous("Percentage", labels = percent_format()) +
- geom_text(aes(label = paste(Difference * 100, "%"),
- vjust = ifelse(Difference >= 0, -1.5, 1.5))) +
- theme_classic()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement