将两个图例添加到image.plot

Question

我是新用户，我需要一些帮助才能为地图设置辅助图例。

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

  

image.plot（X，Y，Z，COL =灰度，legend.mar = 8.5，xlab = “”，ylab = “”，主要= “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..))