R: нанесите в виде сетки на несколько страниц

Я бы хотел расположить сетку 3x3 на 3 страницах файла PDF. Я хотел бы построить график в произвольных местах сетки на трех страницах. Я знаю, как расположить несколько подзаговоров, используя такую ​​опцию, как layout = c (3,3) . Я могу понять, как расположить макет 3x3 на одном участке с помощью пакета сетки, а затем решить, какой график использовать. Однако я не могу понять, как разложить сетку 3x3 на трех страницах, а затем выбрать сетку для построения.

Я надеялся, что grid.newpage () решит мою проблему, как показано ниже:

library(grid)
pdf(file="griddtest.pdf",paper="letter")
vp1 <- viewport(x = 0, y = 0.5, w = 0.5, h = 0.5, just = c("left", "bottom"), 
    name = "vp1")
vp2 <- viewport(x = 0, y = 0.5, w = 0.5, h = 0.5, just = c("left", "bottom"), 
    name = "vp2")
pushViewport(vp1)
grid.text("Some drawing in graphics region 1 on page 1",y = 0.8)
grid.newpage()
pushViewport(vp2)
grid.text("Some drawing in graphics region 2 on page 2",y = 0.8)
dev.off()

, но это просто создает вторую страницу (я предполагаю, что «новая страница» перезаписывает старую, а не создает новую страницу).

Любая помощь будет принята с благодарностью!