expose_layout

Schematic view of a ggplot object's layout.

expose_layout(p, draw = TRUE, newpage = TRUE)

Arguments

p

ggplot

draw

logical, draw the gtable

newpage

logical

Value

gtable

Examples

p1 <- qplot(mpg, wt, data=mtcars, colour=cyl)
#> Warning: `qplot()` was deprecated in ggplot2 3.4.0.
p2 <- qplot(mpg, data = mtcars) + ggtitle('title')
p3 <- qplot(mpg, data = mtcars, geom = 'dotplot')
p4 <- p1 + facet_wrap(~carb, nrow=1) + theme(legend.position='none') +
  ggtitle('facetted plot')
pl <- lapply(list(p1,p2, p3, p4), expose_layout, FALSE, FALSE)
#> `stat_bin()` using `bins = 30`. Pick better value `binwidth`.
#> Bin width defaults to 1/30 of the range of the data. Pick better value with
#> `binwidth`.
grid.arrange(grobs=pl, widths=c(1.2,1,1),
             layout_matrix = rbind(c(1, 2, 3),
                                   c(4, 4, 4)))