Сохранение нескольких графиков один за другим в одном файле pdf

Возможный дубликат:
Как распечатать графику R на несколько страниц PDF и несколько PDF файлов?

Я новичок в R и задаюсь быстрым вопросом. Следующий код записывает один .pdf файл для каждого графика. Я хотел бы добавить цифры один за другим в один файл PDF. Огромное спасибо. Большое спасибо за любую помощь.

i=5  
while (i<=10)   
{   
  name1="C:\\temp\\"  
  num=i   
  ext = ".pdf"  
  path3 = paste(name1,num,ext)  
  par(mfrow = c(2,1))  
  pdf(file=path3)  
  VAR1=rnorm(i)  
  VAR2=rnorm(i)  
  plot(VAR1,VAR2)  
  dev.off()  
  i=i+1  
}