# NOT RUN {
library(ggplot2)
library(metan)
p1 <- ggplot(mtcars, aes(wt, mpg)) +
geom_point()
p2 <- ggplot(mpg, aes(class, hwy)) +
geom_boxplot()
arrange_ggplot(p1, p2)
arrange_ggplot(p1, p2,
ncol = 1,
tag_levels = list(c("(P1)", "(P2)")),
title = "My grouped ggplot",
caption = "A = scatter plot\nB = boxplot")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab