Displaying 1 result from an estimated 1 matches for "lout1".
Did you mean:
out1
2008 Aug 06
1
grid layout scaling viewport width based solely on height
...cover. Any suggestions on how to achieve that effect or
other improvements to the below code are most welcome.
Hopefully, my explanation makes my goal clear. Also note, the real
application is a function that will have arbitrary numbers of side
plots.
Thanks
Peter
require(grid)
grid.newpage()
lout1 <- grid.layout(nrow = 1, ncol = 2,
widths = unit(c(1, 1/10), c('null', 'snpc'))
)
pushViewport(viewport(layout = lout1, w = 0.8, h = 0.8))
pushViewport(viewport(layout.pos.col = 1))
grid.rect()
popViewport()
pushViewport(viewport(layout.pos.col = 2))...