I produced a grid with cowplot:
library(ggplot2) library(cowplot) ggg1 <- ggplot(mtcars, aes(mpg,vs)) + geom_point() + theme(axis.title.x=element_blank
Here's an alternative strategy
library(grid) library(gridExtra) library(egg) grid.arrange(gtable_cbind(gtable_frame(ggarrange(ggg1, ggg2, draw=F)), gtable_frame(ggplotGrob(ggg3))), left = textGrob("Left",rot=90), bottom = textGrob("Bottom"))