par(mar=c(5.1, 4.1, 4.1, 6.1), xpd=TRUE)#画图之前设置图形的留白的距离,xpd为TRUE设置标签绘制在图形区域
plot(2,3)
legend('right',inset=c(-0.2,0),pch=19,legend='A')#设置inset为负即可调整图例在图外,具体的位置可以自己修改

image.png
par(mar=c(5.1, 4.1, 4.1, 6.1), xpd=TRUE)#画图之前设置图形的留白的距离,xpd为TRUE设置标签绘制在图形区域
plot(2,3)
legend('right',inset=c(-0.2,0),pch=19,legend='A')#设置inset为负即可调整图例在图外,具体的位置可以自己修改