Message-ID: <Pine.LNX.4.44.0306061019080.4036-100000@markov.rap.ucar.edu>
Date: 2003-06-06T16:28:09Z
From: Matt Pocernich
Subject: layout problem
Hello,
I have a question about using the layout command within a function. I've
written function that uses layout to create a figure from 2 plots. This
works fine to create a figure. When I use par(mfrow = c(2,2)) to create multiple
plots, it seems that the layout command resets the mfrow parmeter.
Is there a way for me to avoid this problem?
For example
practice<- function() {
op<- par(oma=c(3,3,5,4))
nn<- layout(matrix(c(0,1), nrow = 1), widths = c(1,4))
plot(0,0)
mtext("Sample graph", outer = TRUE, line = 1, cex = 2)
par(op)
}
practice() # works fine.
par(mfrow = c(2,2))
practice()
practice()
practice()
practice()
## produces 4 graphs on seperate pages.
Thanks.
Matt
Matt Pocernich
NCAR - Research Applications Program
303-497-8312