web-dev-qa-db-ja.com

起動時にparをデフォルト値にリセット

通常、私が独自のプロット関数を作成するとき、私は構造を作成します：

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

これは、parを以前の値に戻す標準的な方法です。いくつかのパーを変更するいくつかの関数を実行していて、Rの起動時にデフォルト値にリセットする必要があると想像してください。そうする便利な方法は何ですか？

または言い換えると、どのようにしてpar()のデフォルト値に到達するのでしょうか？

rdefaultpar
67
Joris Meys

新しいデバイスが開かれるたびにpar（）はリセットされるので、別のオプションはdev.off()を実行して続行するだけです。

76
DarkHalo

これはハッキーですが、次のとおりです。

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
51
Gavin Simpson

Quick-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
12
Anusha

以下のスクリプトを使用して、通常の1プロットに戻ります。

par(mfrow = c(1,1))
0
Mahesh