Mostrar 2 tramas juntas

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