gridextra

I have a table, and I want to print a title above it: t1 <- tableGrob(top_10_events_by_casualties, cols=c("EVTYPE", "casualties"), rows=seq(1,10)) grid.draw(t1) A similar question was asked here: Adding text to a grid.table plot I've tried something similar and it doesn't work: > title <- textGrob("Title",gp=gpar(fontsize=50)) > table <- gtable_add_rows(t1, + heights = grobHeight(title) + padding, + pos = 0) Error: is.gtable(x) is not TRUE baptiste Not sure what the problem was, but here is a working example: library(grid) library(gridExtra) library(gtable) t1 <- tableGrob(head(iris)) title <-

I want a combined plot of two plots + their legend like this: library(ggplot2) library(grid) library(gridExtra) dsamp <- diamonds[sample(nrow(diamonds), 1000), ] p1 <- qplot(price, carat, data=dsamp, colour=clarity) p2 <- qplot(price, depth, data=dsamp, colour=clarity) g <- ggplotGrob(p1 + theme(legend.position="bottom"))$grobs legend <- g[[which(sapply(g, function(x) x$name) == "guide-box")]] grid.arrange(arrangeGrob(p1+theme(legend.position="right"),p2+theme(legend.position="none"),legend,ncol=3,widths=c(3/7,3/7,1/7))) However I do not want to guess the width of the plots and legends (and

I am trying to format the table using gridExtra package. The gridExtra package I have is 2.0 and R version is 3.2.1 I was going through answers here on stackoverflow about the formatting and the suggested options seem to work only with older version of the package. For example, grid.table(data, h.even.alpha = 1, h.odd.alpha = 0, v.even.alpha = 1, v.odd.alpha = 1, gpar.corefill, gpar.coretext) All of these options are shown as "unused arguments" in the latest version. Searching further, I found that in new gridExtra package, formatting is defined probably inside theme, example - tt <- ttheme

I know that gridExtra has been updated. As a result, I'm left wondering how to change title sizes. This no longer works grid.arrange(a, b, c, d,ncol=2, nrow=2, main=textGrob("Title", gp=gpar(fontsize=15,font=8))) That no longer works, the option for main has been changed to top but I can't figure out the textGrob features to alter the font size). Any clues? Thanks rolyat First, import the package grid with either library() or require() . Second, change main to top in your code. See below: library(grid) grid.arrange(a, b, c, d,ncol=2, nrow=2, top=textGrob("Title", gp=gpar(fontsize=15,font=8)))

Possible Duplicate: left align two graph edges (ggplot) I am trying to put two plots produced with ggplot on the same page, top and bottom, so that their widths are the same. The data is from the same time series, x axis being time, so it is important that data points with the same time are not shifted horizontally with respect to each other. I tried grid.arrange from package gridExtra: grid.arrange(p1, p2) but the plots have different widths due to different widths of y axis labels. I looked at this post that deals with similar problem, but I could not apply that information to solve my

I'm trying to add a data-table to a graph made in ggplot (similar to the excel functionality but with the flexibility to change the axis its on) I've had a few goes at it and keep hitting a problem with scaling so attempt 1) was library(grid) library(gridExtra) library(ggplot2) xta=data.frame(f=rnorm(37,mean=400,sd=50)) xta$n=0 for(i in 1:37){xta$n[i]<-paste(sample(letters,4),collapse='')} xta$c=0 for(i in 1:37){xta$c[i]<-sample((1:6),1)} rect=data.frame(xmi=seq(0.5,36.5,1),xma=seq(1.5,37.5,1),ymi=0,yma=10) xta=cbind(xta,rect) a = ggplot(data=xta,aes(x=n,y=f,fill=c)) + geom_bar(stat='identity'