r - 将两个图例添加到 image.plot

Question

我是新的 R 用户，我需要一些帮助来设置地图的辅助图例。

描述：我使用字段库中的 image.plot 函数绘制了一张地图，其中 x 和 y 轴指示坐标，色标带有图例并指示态度，如下面的代码行所述：

image.plot(x,y,z,col=greyscale,legend.mar=8.5,xlab="",ylab="",main="Lambert2étendu")

问题：

我在地图上添加了点，指示两种类型的接收器的位置，每种类型具有不同的颜色和 cex。我想在地图下添加一个图例来描述每个颜色的含义

谢谢你的帮助

Answer 1

用于legend次要图例。增加底部mar杜松子酒并添加带有负数的图例inset，即远离情节：

library(fields)
x<- 1:10
y<- 1:15
z<- outer( x,y,"+") 

# plot with extra margin at bottom (7)
par(mar=c(7,4,4,2)+0.1)
image.plot(x,y,z,col=gray.colors(10), xlab='', ylab='') 

# create points
xp = sample(1:10,size=5)
yp = sample(1:10,size=5)
points(xp,yp,pch=21,bg=1:2,cex=1:2)

# add legend (might have to change inset if you resize the plot)
legend('bottom', horiz=T, legend=paste('type', 1:2), pt.cex=1:2, pch=21, pt.bg=1:2, xpd=NA, inset=c(0,-1..))