将图例放置在动态变化的图R之外

Question

在我的 R代码中，我有两种情况 ，每种情况导致不同情节，具体取决于S 1更大或更小。我想知道如何取出（向上移动）当前的图例并将其放在同一地点的图块上方以获得任何一个图？

注意： 由于 Y轴处于对数比例，我使用了{{1}但我需要将一个添加到10^par('usr')[4]（即 10^par('usr')[4]），以便“此数字”将图例放在上方完全相同的位置？

这是 R代码：

(10^par('usr'))[4] + a number

Answer 1

您可以在inset中使用legend参数。为此，您需要将图例位置用作单词。在您的情况下，"topleft"。这样，您无需根据“y”提供具体位置。

插入参数允许您偏移图例。在本例中，y偏移-0.03。

我还使用par(xpd=TRUE)来扩展允许的绘图空间。最后，我还改变了字体大小以生成以下图表。

par(xpd=TRUE)
legend("topleft", legend=bquote(paste("Selected Prior:              ",bold('PN'[10])," = ", .(round(S,3)))), ## Legend
   pch = 21,cex=1,pt.bg="green", col="red", pt.cex=2, bty="n", inset=c(0,-0.03))