Метка оси Y, выходящая за пределы графического окна?

Question

Я попытался просто нарисовать некоторые данные в R с горизонтальной меткой по оси Y и слева от метки галочки по оси Y.Я думал, что код ниже будет работать:

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

Вместо этого, как вы можете видеть, метка оси Y почти полностью выпала за пределы графического окна.Это явление все еще существует, независимо от того, насколько я расширяю маржу LHS.

В: Что я делаю не так?Что-то мне нужно сделать с параметром oma?Что мне нужно сделать, чтобы построить вещи так, как я собираюсь?Я немного ошеломлен всем этим!

Answer 1

Это классический, может быть, должен быть FAQ. Вы должны установить par settings после call на pdf, что создает устройство печати. В противном случае вы изменяете настройки на устройстве по умолчанию:

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()