[R] reset par() within plot layout

[Janke ten Holt]

Dear list,

I would like to produce a matrix of plots, where par() is reset after
each plot (see below [simplified] example). When I use layout() to do
so, I seem to also reset the layout. I have not been able to figure out
how to prevent this from happening.

Any help is greatly appreciated!
Janke

Example code:
#Desired result is a layout of 2 plots: one red and one black
layout(matrix(1:2, nr=2))
par.ini <- par(no.readonly=TRUE)
par(col="red")
plot(1:100)

par(par.ini)

plot(1:10)

------------------
Janke ten Holt
Dept. of Psychology/Sociology
University of Groningen, the Netherlands