title: First Page empty when printing plots in R
body: <p>I am trying to create a pdf with several plots. More specifically, I want to save my plots, 4 in each page. Therefore, I have the following code in r (which works, but leaves a page empty -the first one-):</p>
  
  <pre><code>pdf("Plots/plots_numeric_four_in_page.pdf",paper="a4r",width = 14)
  
  graphlist &lt;- lapply(3:NCOL(agg_num), function(i) {
    force(i)
    tempColName=dataName_num[i]
    print (tempColName)
    p&lt;-qplot(Group.1,agg_num[[tempColName]],data = agg_num,color=Group.2,geom = "line",main=tempColName) + xlab("Date") + ylab(paste("Count of ", tempColName)) +  geom_line(size=1.5)+ scale_x_date(labels = date_format("%m/%Y"))+ 
      theme(legend.position="bottom",legend.direction="horizontal")+ guides(col=guide_legend(ncol=3))
  })
  do.call("marrangeGrob",c(graphlist,ncol=2,nrow=2))
  dev.off()
  </code></pre>
  
  <p>It correctly displays around 50 plots, 4 in each page correctly in a PDF. However, it leaves the first page empty and starts from the second. I looked at marrangeGrob options, but I couldnt find anything to address the problem. Do you know any workaround, or any way to resolve this issue?</p>