gridextra

I have 12 plots generated by a loop and I want to plot them with 3 rows and 2 columns on one page (2 pages in total). I know how to do it in R pdf("1.pdf") par(mfrow = c(3, 2)) for (i in 1:12) { x <- 1:10 y <- 2*x + rnorm(x) plot(x, y) } dev.off() But how to do this using ggplot ? library(ggplot2) library(grid) library(gridExtra) for (i in 1:12) { x <- 1:10 y <- 2*x + rnorm(x) qplot(x, y) } I think I have to use grid.arrange but need some help on that. Thanks. You might want to take a look at the cowplot package that allows more flexibility than just using a naked grid.arrange . This works -

I am trying to plot a number of graphs next to each other using grid.arrange. Specifically, I would like the plots to have a shared x axis label and a legend at the bottom. Here is the code I am using for the arrangement ( working example here ), sans the universal x axis: plot.c <- grid.arrange(arrangeGrob(plot.3 + theme(legend.position="none"), plot.2 + theme(legend.position="none"), plot.4 + theme(legend.position="none"), nrow=1), my.legend, main="Title goes here", left=textGrob("Y Axis", rot = 90, vjust = 1), nrow=2,heights=c(10, 1)) The legend is a TableGrob object; the universal x axis

I'd like to add colors to certain words in titles to my graphs. I've been able to find some precedent here . Specifically, I'd like the text that's wrapped in apostrophes (in the output, below) to correspond to the color of their respective bar charts. Here's how far I've gotten with titles in R before having to export a PDF to Adobe Illustrator or other program. name <- c("Peter", "Gabriel", "Rachel", "Bradley") age <- c(34, 13, 28, 0.9) fake_graph <- family[order(family$age, decreasing = F), ] fake_graph <- within(fake_graph, { bar_color = ifelse(fake_graph$name == "Rachel", "blue", "gray")

I am attempting to use grid.table to produce an image of a table for placement in a word document using Rstudio-knitr-pandoc. It is rather large with long column names. The solution I would like to accomplish is rotating the column headings to 90 vertical. Is this possible with grid.table or any other means? I have tried toxinsGrob<-tableGrob(cyano.x.t,name='toxins',edits=gEdit(gPath='gpar.coltext',rot=90)) grid.draw(toxinsGrob) to no avail. Suggetions? Joel it's easy with the new version of grid.table, tt = ttheme_default(colhead=list(fg_params=list(rot=90))) grid.newpage() grid.table(head

I am trying to combine tables from grid.table together with plots from base package into a single plot. As far as I understand, grid.table produced the same type of output as the one produced by ggplot. So the problem is similar to the one in this thread: Combine base and ggplot graphics in R figure window I tried to apply the solution from that thread, but it does not work for me. The first table is placed in the correct position, but the second is not. The solution from that thread works if I have no more than 1 table produced by grid.table. What are the modifications I have to do, to make