Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #' geom_ghazi. Annotate any ggplot2 plot with Benghazi, because it's
- #' always about Benghazi
- library("ggplot2")
- geom_ghazi <- function(gp = grid::gpar(fontsize = 75, fontface = "bold"),
- ...) {
- annotation_custom(grid::textGrob("BENGHAZI", gp = gp, ...),
- xmin = -Inf, xmax = Inf, ymin = -Inf, ymax = Inf)
- }
- ggplot(mtcars, aes(x = disp, y = mpg)) + geom_point() + geom_ghazi()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement