arrangeGrob: arrangeGrob

In gridExtra: functions in Grid graphics

Description

arrange ggplot2, lattice, and grobs on a page

Usage

arrangeGrob(..., as.table=FALSE, clip=TRUE, main, sub,
    left, legend)

Arguments

...	plots of class ggplot2, trellis, or grobs, and valid arguments to grid.layout
main	string, or grob (requires a well-defined height, see example)
sub	string, or grob (requires a well-defined height, see example)
legend	string, or grob (requires a well-defined width, see example)
left	string, or grob (requires a well-defined width, see example)
as.table	logical: bottom-left to top-right or top-left to bottom-right
clip	logical: clip every object to its viewport

Value

return a frame grob; side-effect (plotting) if plot=T

See Also

grid.layout

Examples

## Not run: 
require(ggplot2)
plots = lapply(1:5, function(.x) qplot(1:10,rnorm(10),main=paste("plot",.x)))
require(gridExtra)
do.call(grid.arrange,  plots)
require(lattice)
grid.arrange(qplot(1:10), xyplot(1:10~1:10), tableGrob(head(iris)), nrow=2, as.table=TRUE, main="test main", sub=textGrob("test sub", gp=gpar(font=2)))

## adding a common legend
library(ggplot2)
dsamp <- diamonds[sample(nrow(diamonds), 1000), ] 

p1 <- qplot(carat, price, data=dsamp, colour=clarity)
p2 <- qplot(carat, price, data=dsamp, colour=clarity, geom="path")

leg <- ggplotGrob(p1 + opts(keep="legend_box"))
## one needs to provide the legend with a well-defined width
legend=gTree(children=gList(leg), cl="legendGrob")
widthDetails.legendGrob <- function(x) unit(2, "cm")

grid.arrange(p1 + opts(legend.position="none"),
p2 + opts(legend.position="none"),
legend=legend,
main ="this is a title",
left = "This is my global Y-axis title")


## End(Not run)

gridExtra documentation built on May 2, 2019, 4:59 p.m.