在启动时将par重设为默认值

通常当我做自己的情节function时,我做一个构造:

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

这是将par恢复到之前值的标准方式。 想象一下,你已经运行了一些修改了一些parser的函数,并且你需要在R启动时重置为默认值。这样做的方便之处是什么?

换句话说:如何达到par()的默认值?

每次打开一个新设备时,par()都会重置,所以另一个选项就是简单地执行dev.off()并继续。

这是哈克,但是:

 resetPar <- function() { dev.new() op <- par(no.readonly = TRUE) dev.off() op } 

在时尚之后工作,但它暂时在屏幕上闪烁新的设备…

例如:

 > par(mfrow = c(2,2)) ## some random par change > par("mfrow") [1] 2 2 > par(resetPar()) ## reset the pars to defaults > par("mfrow") ## back to default [1] 1 1 

从快速R

 par() # view current settings opar <- par() # make a copy of current settings par(col.lab="red") # red x and y labels hist(mtcars$mpg) # create a plot with these new settings par(opar) # restore original settings