Mostre 2 ggplots juntos
require(gridExtra) #import the grid.arrange function through gridExtra package
plot1 <- qplot(x,y1)
plot2 <- qplot(x,y2)
grid.arrange(plot1, plot2, ncol=2)
MauriceLePastis