根据图例向量的曲线图中的长度在图例改变文字的大小(Change the size of the te

我要画一个20个地块和水平放置一个传说中的每个地块。

我给第一个情节以下命令：

plot(x=1:4,y=1:4)
legend("bottom",legend = c("a","b","c","d"),horiz=TRUE,text.font=2,cex=0.64)

然后第二个情节我尝试：

plot(x=1:2,y=1:2)
legend("bottom",legend = c("a","b"),horiz=TRUE,text.font=2,cex=0.64)

但由于传递到传说的说法字符向量的大小是不同的，我得到不同的传说的大小。

因为我有阴谋有传说中的大小不等这么多不同的情节，我也想这样做自动化的方式。

有没有办法做到这一点，可以解决这个传说的大小，所有的情节和适合它的图形大小？

Answer 1:

par(cex=.64)在开始时应该足够

op <- par(cex=.64)  # this fix the legend size for all plots
plot(x=1:4,y=1:4)
legend("bottom",legend = c("a","b","c","d"),horiz=TRUE,text.font=2) # no need to set cex anymore
plot(x=1:2,y=1:2)
legend("bottom",legend = c("a","b"),horiz=TRUE,text.font=2)
par(op) # At end of plotting, reset to previous settings

文章来源: Change the size of the text in legend according to the length of the legend vector in the graph