R基础绘图中图例与绘图区域重叠问题求助

问题根源 #

你的代码存在两个核心问题：

• 绘图底部边距设置过小（par(mar = c(3,1,1,1))的第一个值对应底部边距，仅3行），即便开启xpd=T允许图例超出绘图区域，也没有足够空间容纳图例，导致重叠。
• 使用inset=c(0,-0.5)时，图例被向下移出了设备的可视范围，所以直接消失。

解决方法 #

方法1：增大底部边距，让图例嵌在边距内

直接调整mar的底部边距值，给图例预留足够空间，无需额外的xpd或inset参数：

par(mar = c(5,1,1,1)) # 将底部边距从3改为5，足够放下图例
plot(1:3, rnorm(3), pch=1, lty=1, type="o", ylim=c(-2,2))
legend("bottom", legend = c("a","b"), horiz=T,
       bty = "n", pch=15 , col= c("green","red"), text.col = "black", 
       cex=1, pt.cex=1)

方法2：保持小边距，精准控制图例下移幅度

如果不想调整边距，缩小inset的负数值，让图例仅小幅下移，同时保留xpd=T允许图例超出绘图区域：

par(mar = c(3,1,1,1))
plot(1:3, rnorm(3), pch=1, lty=1, type="o", ylim=c(-2,2))
legend("bottom", legend = c("a","b"), horiz=T,
       bty = "n", pch=15 , col= c("green","red"), text.col = "black", 
       cex=1, pt.cex=1, xpd=T, inset=c(0, -0.2)) # 减小下移幅度，避免跑出可视区

方法3：直接指定图例坐标（最精准）

跳过位置参数，用x和y直接指定图例坐标，将其放在绘图区域下方：

par(mar = c(3,1,1,1))
plot(1:3, rnorm(3), pch=1, lty=1, type="o", ylim=c(-2,2))
legend(x=2, y=-2.5, legend = c("a","b"), horiz=T,
       bty = "n", pch=15 , col= c("green","red"), text.col = "black", 
       cex=1, pt.cex=1, xpd=T) # x设为绘图中点，y设为低于ylim下限的位置

内容的提问来源于stack exchange，提问作者Jeff238