r - 用于多绘图的单个标签

Question

我试图让我的情节只在外边缘贴上标签，例如：

但我似乎无法弄清楚如何让它发挥作用。

我花了一些时间与this question，但我不太了解一般情况下的标准或绘图是如何工作的，所以它并没有给我带来太多好处。 / p>

无论如何，我在这一点上附上了我所拥有的简化版本，我真的非常感激。

library(popbio)

mat <- matrix2(c(0,0,0,6.13,0.22,0.55,0.05,0,0,0.23,0.79,0.15,0,0,0.16,0.85)) 

ela <- elasticity(mat)
sen <- sensitivity(mat)

par(mfrow = c(1, 3), oma = c(0, 2, 2, 0), mar = c(0, 1, 1, 0), xpd = NA)

image2(mat, mar = c(1,3.5,5,1), col = c("grey"), labels=c(0,0,0,0))
image2(ela, mar = c(1,3.5,5,1), labels=c(0,0,0,0))
image2(sen, mar = c(1,3.5,5,1), labels=c(0,0,0,0))

title(xlab=c("matrix","elasticity","sensitivity"), ylab=c("herb"), outer=TRUE, line=3)

谢谢！

Answer 1

那复杂吗？怎么样：

par(mfrow = c(1, 3))

image2(mat, mar = c(1,3.5,5,1), col = c("grey"), labels=c(0,0,0,0))
mtext(text = "herb", side = 2, line = 1, las = 2, font = 2)
mtext(text = "matrix", side = 3, line = 0, font = 2)

image2(ela, mar = c(1,3.5,5,1), labels=c(0,0,0,0))
mtext(text = "elas", side = 3, line = 0, font = 2)

image2(sen, mar = c(1,3.5,5,1), labels=c(0,0,0,0))
mtext(text = "sens", side = 3, line = 0, font = 2)