Displaying 2 results from an estimated 2 matches for "gridomi".
2004 Sep 07
1
gridBase and heatmap
...upper right.
Thanks in advance for insight....
Sean
> pushViewport(viewport(layout = grid.layout(1, 3, widths =
unit(rep(1,3), c("null", "cm", "null")))))
viewport[GRID.VP.177]
> pushViewport(viewport(layout.pos.col=1))
viewport[GRID.VP.178]
> par(omi=gridOMI(),new=T)
> my.heatmap(eb$coefficients[(clsum[,1]>1) & (clsum[,2]>1) &
(clsum[,3]==0),],breaks=c(seq(-2.5,-0.6,0.1),
-0.1,0.10,seq(0.6,2.5,0.1)),dendrogram="none",Colv=c(9:12,5:8,1:
4),labRow=rep('',520),margin=c(10,5),colsep=c(4,8),trace="none",dens...
2009 Mar 20
1
Howto Supress Extra Blank Page in gridBase
...page?
I am using: R version 2.7.2 (2008-08-25)
and gridBase version: 0.4-3
__ BEGIN__
library(grid)
library(gridBase)
opar <- par(no.readonly=TRUE)
par(opar)
grid.newpage()
pushViewport(viewport(width=0.5, height=0.5))
grid.rect(gp=gpar(col="grey", lty="dashed"))
par(omi=gridOMI())
par(mfrow=c(2, 2), mfg=c(1, 1), mar=c(3, 3, 1, 0))
for (i in 1:4) {
plot(1:10)
}
__ END__
- Gundala Viswanath
Jakarta - Indonesia