Greetings
I went back over the examples in the R Graphics book on the grid
webpage and saw an example which I have adapted and seems to work:
pushViewport(viewport(layout=grid.layout(nrow=26,ncol=2)))
pushViewport(viewport(layout.pos.col=1,layout.pos.row=1))
plot_gene_map(dna_segs=list(segs[[1]][["seg"]]),annotations=segs[[1]]
[["annot"]],dna_seg_scale=T,
scale_cex
=
1.4
,dna_seg_line
=F,plot_new=FALSE,scale=F,arrow_head_length=1,annotation_cex=1.4,
main="A",main_pos="left")
popViewport()
pushViewport(viewport(layout.pos.col=1,layout.pos.row=2))
plot_gene_map(dna_segs=list(segs[[2]][["seg"]]),annotations=segs[[2]]
[["annot"]],dna_seg_scale=T,
scale_cex
=
1.4
,dna_seg_line
=F,plot_new=FALSE,scale=F,arrow_head_length=1,annotation_cex=1.4,
main="B",main_pos="left")
popViewport()
pushViewport(viewport(layout.pos.col=1,layout.pos.row=3))
plot_gene_map(dna_segs=list(segs[[3]][["seg"]]),annotations=segs[[3]]
[["annot"]],dna_seg_scale=T,
scale_cex
=
1.4
,dna_seg_line
=F,plot_new=FALSE,scale=F,arrow_head_length=1,annotation_cex=1.4,
main="C",main_pos="left")
popViewport()
There must be some error in the way I was calling the function
plotpush in the previous email.
Cheers
Mike