R 图例在绘图中的位置

Question

我有一个图，其中的数据进入我想用于图例的区域。有没有办法让绘图自动放入最高数据点上方的标题空间之类的内容以适应图例？

如果我手动输入 ylim() 参数来扩展大小，然后给出我想要图例所在位置的确切坐标，我就可以让它工作，但我更希望有一个更灵活的方法这样做的方法是因为它是数据库查询的前端，并且数据级别可能具有非常不同的级别。

Answer 1

编辑 2017：

使用 ggplot 和 theme(legend.position = "")：

library(ggplot2)
library(reshape2)

set.seed(121)
a=sample(1:100,5)
b=sample(1:100,5)
c=sample(1:100,5)

df = data.frame(number = 1:5,a,b,c)
df_long <- melt(df,id.vars = "number")
ggplot(data=df_long,aes(x = number,y=value, colour=variable)) +geom_line() +
theme(legend.position="bottom")

原始答案 2012：
将图例放在底部：

set.seed(121)
a=sample(1:100,5)
b=sample(1:100,5)
c=sample(1:100,5)

dev.off()

layout(rbind(1,2), heights=c(7,1))  # put legend on bottom 1/8th of the chart

plot(a,type='l',ylim=c(min(c(a,b,c)),max(c(a,b,c))))
lines(b,lty=2)
lines(c,lty=3,col='blue')

# setup for no margins on the legend
par(mar=c(0, 0, 0, 0))
# c(bottom, left, top, right)
plot.new()
legend('center','groups',c("A","B","C"), lty = c(1,2,3),
       col=c('black','black','blue'),ncol=3,bty ="n")

Answer 2

您必须将图例框的大小添加到 ylim 范围

#Plot an empty graph and legend to get the size of the legend
x <-1:10
y <-11:20
plot(x,y,type="n", xaxt="n", yaxt="n")
my.legend.size <-legend("topright",c("Series1","Series2","Series3"),plot = FALSE)

#custom ylim. Add the height of legend to upper bound of the range
my.range <- range(y)
my.range[2] <- 1.04*(my.range[2]+my.legend.size$rect$h)

#draw the plot with custom ylim
plot(x,y,ylim=my.range, type="l")
my.legend.size <-legend("topright",c("Series1","Series2","Series3"))

Answer 3

基于 @P-Lapointe 解决方案构建，但使其变得非常简单，您可以使用 max() 来使用数据中的最大值，然后重新使用这些最大值来设置图例 xy 坐标。为了确保不会超出边界，您将 ylim 设置为略高于最大值。

a=c(rnorm(1000))
b=c(rnorm(1000))
par(mfrow=c(1,2))
plot(a,ylim=c(0,max(a)+1))
legend(x=max(a)+0.5,legend="a",pch=1)
plot(a,b,ylim=c(0,max(b)+1),pch=2)
legend(x=max(b)-1.5,y=max(b)+1,legend="b",pch=2)

Answer 4

?legend 会告诉您：

参数

x, y
用于定位图例的 x 和 y 坐标。它们可以通过关键字或 xy.coords 接受的任何方式指定：请参阅“详细信息”。

详细信息：

参数 x、y、legend 以非标准方式解释，以允许通过一个或两个参数指定坐标。如果图例丢失并且 y 不是数字，则假定第二个参数是图例，并且第一个参数指定坐标。

坐标可以以xy.coords 接受的任何方式指定。如果给出一个点的坐标，则将其用作包含图例的矩形的左上角坐标。如果它给出两个点的坐标，则这些点指定矩形的对角（任意一对角，顺序任意）。

还可以通过将 x 设置为列表中的单个关键字来指定位置 bottomright、bottom、bottomleft、 left、topleft、top、topright、right 和 center< /代码>。这会将图例放置在图框内部的给定位置。使用部分参数匹配。可选的 inset 参数指定图例从绘图边距插入的距离。如果给出单个值，则该值将用于两个边距；如果给出两个值，第一个值用于 x 距离，第二个值用于 y 距离。