R语言调整绘图图例至绘图区域外部的技术问询

你只需调整legend()函数的inset参数即可实现需求：

• inset接收长度为2的数值向量，第一个值控制水平方向偏移，第二个值控制垂直方向偏移，偏移量单位为绘图区域的占比
• 要向下移动图例，将第二个垂直偏移的数值改为正数即可，数值越大，向下移动的距离越大

修改后的完整可运行代码如下：

A <- data.frame(x=rnorm(100, 20, 2), y=rnorm(100, 20, 2))
B <- data.frame(x=rnorm(100, 21, 1), y=rnorm(100, 21, 1))

par(mar=c(5.1, 4.1, 4.1, 8.1), xpd=TRUE)

plot(y ~ x, A, ylim=range(c(A$y, B$y)), xlim=range(c(A$x, B$x)), pch=1,
     main="两组数据散点图")
points(y ~ x, B, pch=3)

# 可根据实际显示效果调整inset的第二个参数数值
legend("bottomright", inset=c(-0.2, 0.15), legend = c("A组", "B组"), pch = c(1,3), title="组别", title.col = "black", cex = 1.2)

补充说明：原代码中legend参数仅设置为3，无法匹配两个分组的点样式，上述代码补充了pch参数对应两组的点标记，你可以根据自己的实际需求修改图例文本内容。

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