r - 起動時に par をデフォルト値にリセットする

Question

通常、独自のプロット関数を作成するときは、コンストラクトを作成します。

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

parこれは、を以前の値に戻す標準的な方法です。一部のパーを変更したいくつかの関数を実行していて、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

クイックアールより

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