# Re: [S] plot 2+3

Jeff Gill (jgill@www-vdc.fas.harvard.edu)
Tue, 19 May 1998 11:26:55 -0400 (EDT)

Christian:
Here's some code I wrote to plot 2/3/2 where everything is symmetrically
centered. You can readily edit it to get what you want. Jeff.

#####################################################################

ruler <- seq(0,1,length=nrow(mc.mat))
par(omd=c(0,1,0,1),mfg=c(1,u, ,2),mfrow=c(3,3))
plot(ruler,mc.mat[,1],type="l",
main="Variable 1",cex=.7,xlab="alpha",ylab="slope change")
plot(ruler,mc.mat[,2],type="l",
main="Variable 2",cex=.7,xlab="alpha",ylab="slope change")

par(omd=c(0,2/3,1/3,2/3),mfg=c(1,1,1,2),new=T)
plot(ruler,mc.mat[,3],type="l",
main="Variable 3",cex=.7,xlab="alpha",ylab="slope change")
par(omd=c(0,2/3,1/3,2/3),mfg=c(1,2,1,2),new=T)
plot(ruler,mc.mat[,4],type="l",
main="Variable 4",cex=.7,xlab="alpha",ylab="slope change")
par(omd=c(0,2/3,1/3,2/3),mfg=c(1,3,1,2),new=T)
plot(ruler,mc.mat[,5],type="l",
main="Variable 5",cex=.7,xlab="alpha",ylab="slope change")

par(omd=c(0.175,.825,2/3,3/3),mfg=c(3,1,1,2),new=T)
plot(ruler,mc.mat[,6],type="l",
main="Variable 6",cex=.7,xlab="alpha",ylab="slope change")

par(omd=c(0.175,.825,2/3,3/3),mfg=c(3,2,1,2),new=T)
plot(ruler,mc.mat[,7],type="l",
main="Variable 7",cex=.7,xlab="alpha",ylab="slope change")

#####################################################################

On Tue, 19 May 1998, Christian Hoffmann wrote:

Hi all,

I want ot plot 2 figures in the first row of a multiple plot, and 3 figures
in the second. How can I do that?
Experimenting with

par(mfrow=c(2,2))
plot( one )
plot( two )
par(mfg=c(2,2,2,1))
par(new=T)
Plots on new window: which I do not wnat:
par(mfrow=c(1,3))
plot( three )
plot( four )
plot(five)

--Christian

Christian W. Hoffmann
Swiss Federal Institute for Forest, Snow and Landscape Research
CH-8903 Birmensdorf, Switzerland
phone: ++41-1-739 22 77 fax : ++41-1-739 22 15 e-mail: hoffmann@wsl.ch
WWW: http://www.wsl.ch/wsidb/leute/cho/choHPENG.html
-----------------------------------------------------------------------
This message was distributed by s-news@wubios.wustl.edu. To unsubscribe
send e-mail to s-news-request@wubios.wustl.edu with the BODY of the
message: unsubscribe s-news

-----------------------------------------------------------------------
This message was distributed by s-news@wubios.wustl.edu. To unsubscribe
send e-mail to s-news-request@wubios.wustl.edu with the BODY of the
message: unsubscribe s-news