Restablecer la par con los valores por defecto en el arranque

Question

Normalmente cuando hago mis propias funciones de la trama, hago un constructo:

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

que es la forma habitual de revertir la par a los valores anteriores. Imagine que ha estado ejecutando algunas funciones que cambiaron algunos de los pares, y necesita restablecer los valores predeterminados al inicio en R. ¿Cuál es la forma conveniente de hacerlo?

O en otras palabras: ¿cómo se alcanzan los valores predeterminados para par()?

Answer 1

Cada vez que se abre un nuevo dispositivo, par() se reiniciará, entonces otra opción es simplemente hacer dev.off() y continuar.

Answer 2

Ésta es hacky, pero:

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

obras en cierto modo, pero lo hace parpadear un nuevo dispositivo en la pantalla temporalmente ...

Ejem:

> 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

De 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