etiqueta del eje y que cae fuera de la ventana de gráficos?

Question

Intenté simplemente trazar algunos datos en R con la etiqueta del eje y horizontal y la izquierda de las etiquetas de los puntos y. Pensé que el código de abajo funcionaría:

set.seed(1) 
n.obs  <- 390 
vol.min  <- .20/sqrt(252 * 390) 
eps   <- rnorm(n = n.obs, sd = vol.min) 
mar.default <- c(5,4,4,2) + 0.1 
par(mar = mar.default + c(0, 4, 0, 0))    # add space to LHS of plot 
pdf("~/myplot.pdf", width=5.05, height=3.8) 
plot(eps, main = "Hello World!", las=1, ylab="") # suppress the y-axis label 
mtext(text="eps", side=2, line=4, las=1)    # add horiz y-axis label 
                # 4 lines into the margin 

En cambio, como se puede ver, la etiqueta del eje y casi se cae completamente fuera de la ventana gráfica. Este fenómeno todavía existe sin importar cuánto amplíe el margen de LHS.

P: ¿Qué estoy haciendo mal? ¿Hay algo que deba hacer con el parámetro oma? ¿Qué debo hacer para trazar las cosas de la forma en que intento? ¡Estoy un poco abrumado por todo esto!

Answer 1

Este es uno clásico, tal vez debería ser una pregunta frecuente. Tiene que establecer la configuración pardespués de la llamada al pdf, que crea el dispositivo de trazado. De lo contrario se está modificando la configuración en el dispositivo por defecto:

set.seed(1) 
n.obs  <- 390 
vol.min  <- .20/sqrt(252 * 390) 
eps   <- rnorm(n = n.obs, sd = vol.min) 
       # add space to LHS of plot 
pdf("~/myplot.pdf", width=5.05, height=3.8) 
mar.default <- c(5,4,4,2) + 0.1 
par(mar = mar.default + c(0, 4, 0, 0)) 
plot(eps, main = "Hello World!", las=1, ylab="") # suppress the y-axis label 
mtext(text="eps", side=2, line=4, las=1) 
dev.off()