Reset par to the default values at startup

Question

Normally when I make my own plot functions, I make a construct :

op <- par(\"mypar\"=myvalue)
on.exit(par(op))

which is the standard way

Answer 1

An alternative solution for preventing functions to change the user par. You can set the default parameters early on the function, so that the graphical parameters and layout will not be changed during the function execution. See ?on.exit for further details.

on.exit(layout(1))
opar<-par(no.readonly=TRUE)
on.exit(par(opar),add=TRUE,after=FALSE)