grid.layout内の内側の図形マージンを制御する

Question

グリッドに複数の格子プロットをプロットしようとしています。シンプルなグラフィックコントロール、そのようなものがあることを、

plot <- xyplot(1:10~1:10) 

page.layout <- grid.layout(nrow = 2, ncol = 1, 
       widths = unit(c(1), "null"), 
       heights = unit(c(1), "null"), 
       default.units = "null", 
       respect = FALSE, 
       just = "centre") 

pushViewport(viewport(layout = page.layout)) 
pushViewport(viewport(layout.pos.row = 1)) 
par(mar = c(5, 4, 4, 2)) 
print(plot, newpage = FALSE) 
popViewport() 
pushViewport(viewport(layout.pos.row = 2)) 
par(mar = c(5, 4, 4, 2)) 
print(plot, newpage = FALSE) 
popViewport() 

私は2つの数字の間にスペースを減らすために、今たいが、私はgridBaseためビネットで読む： はので、私は、次のコードを使用しています行うには、 par (mar=c())が動作するはずですが、ここでは該当しません。 多分私は何かが分からないのですが、どうして私が余白のパラメータを制御できないのか分かりません。 提案がありますか？

Answer 1

latticeは

p <- xyplot(1:10~1:10, 
      par.settings=list(layout.heights=list(top.padding=-3, bottom.padding=-1))) 

library(gridExtra) 
grid.arrange(p, p, nrow=2)