# \donttest{
library(ggplot2)
library(metan)
p1 <- ggplot(mtcars, aes(wt, mpg)) +
geom_point()
p2 <- ggplot(mpg, aes(class, hwy)) +
geom_boxplot()
# Default plot
arrange_ggplot(p1, p2)
# Insert plot annotation, titles and subtitles
arrange_ggplot(p1, p2,
ncol = 1,
tag_levels = "1",
tag_prefix = "P.",
title = "My grouped ggplot",
subtitle = "Made with arrange_ggplot()",
caption = "P1 = scatter plot - P2 = boxplot")
# }
Run the code above in your browser using DataLab