Displaying 1 result from an estimated 1 matches for "evenrow".
2003 Oct 19
0
Oceanographic lattice plots
..."bottom"),
layout=grid.layout(nrow*2, ncol,
heights=unit(rep(c(1, 1), nrow),
rep(c("lines", "null"), nrow)))))
for (i in 1:nrow) {
for (j in 1:ncol) {
index <- (i-1)*ncol + j
evenrow <- i %% 2 == 0
evencol <- j %% 2 == 0
if (index < 23) {
# Go to plot region i, j
# Set the yscale for doing the overlay later
push.viewport(viewport(layout.pos.row=i*2, layout.pos.col=j,
yscale=c(400, 0)))
grid.rect(gp=gpa...