r - R とグリッドで複数の図のレイアウトが異なる同じサイズのサブプロットを取得する方法

Question

grid パッケージを使用して、複数のグラフを作成しています。

# load libraries
library(grid)
library(ggplot2)
library(gridSVG)

# create some data
p <- ggplot(mtcars, aes(wt, mpg))

# push Viewport and create layout
pushViewport(viewport(layout = grid.layout(nrow = 5, ncol = 4)))
matrixindex = cbind(rep(1:5,each =4), rep(1:4,times=5))

#fill viewport
for (k in 1:20){
print(p+geom_point(),
vp=viewport(layout.pos.row=matrixindex[k,1],layout.pos.col=matrixindex[k,2]))}

# export as SVG
gridToSVG("trial.svg","none","none")

ここで、レイアウトを変更して 2 番目の図を作成したいと思います (1 行だけですが、4 列です)。ただし、図内の個々のプロットは、5x4 レイアウトと同じサイズにする必要があります。どうすればこれを達成できますか？

Answer 1

heightsand / orwidths引数を使用しgrid.layoutてサイズを修正できます。例:

pushViewport(viewport(layout = grid.layout(heights = unit(0.2 , "npc" ) ,nrow = 1, ncol = 4)))

'npc'正規化された親座標を意味するため、0.2 はビューポートの 1/5 を使用します。