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

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

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

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

换句话说：如何达到par()的默认值？

Answer 1

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

Answer 2

这是哈克，但是：

 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 

Answer 3

从快速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