r - 覆盖两 block 图的多行文字 y Axis 标签

Question

在下面的示例中，如何使用 mtext(side = 2,text="y-axis") 为两个图 block 放置 y Axis 标签？也就是说，我希望能够放置一个标签，而不是放置两个单独的 y Axis 标签。

layout(matrix(1:2,ncol=1),widths=1,heights=c(2,2),respect=FALSE)
par(mar = c(0, 4.1, 4.1, 2.1))
plot(rnorm(100),main="Hi",type='l',ylab='',xaxt='n')
par(mar = c(4.1, 4.1, 0, 2.1))
plot(rnorm(100),main="",xlab="Hi",type='l',ylab='')

Answer 1

正确的做法是用par(oma=...) 添加一个外边距 , 用 ann=FALSE 抑制注释，然后使用 mtext(..., outer=TRUE) 将它们手动添加到外边距中等等

layout(matrix(1:2,ncol=1),widths=1,heights=c(2,2),respect=FALSE)
par(mar = rep(0, 4), oma=c(4, 4, 4, 2), las=1)
plot(rnorm(100), type='l', ann=FALSE, xaxt='n')
plot(rnorm(100), type='l', ann=FALSE)

title("Hi", outer=TRUE)
mtext("x-axis", 1, 3, outer=TRUE)
mtext("y-axis", 2, 3, outer=TRUE, las=0)

这是一个引用:http://research.stowers-institute.org/efg/R/Graphics/Basics/mar-oma/

另请注意 las将所有标签变为水平的参数。它使阅读更容易，并向您的听众展示您知道您的阴谋:)