Question

我正在使用下面给出的三行代码从存储在文件中的数据绘制光栅图像。但是，我希望在图像下方生成图例（或颜色图表）。默认图例在右侧生成。知道如何在所需位置获得传奇。其次，我在图像周围得到一个矩形，这是我在最终情节中不需要的。请帮我解决这些问题。

            temp_var<-raster(input)
    par(mar=c(0,0,0,0))
    plot(temp_var,legend=F,axes=FALSE)

谢谢...

Answer 1

我已经使用plot()方法中的矩形与Raster*个对象进行了争斗。我确信有办法摆脱它，但你不需要。我一直使用这种解决方法：

image(temp_var, axes=FALSE, xlab="", ylab="")

至于你的传奇，我相信你必须手动构建你的规格。尝试：

layout(matrix(c(1,1,1,1,1,2,2), 7, 1))
par(mar=c(0,0,0,0))
image(temp_var, axes=FALSE, xlab="", ylab="")
plot(c(0,1), c(0,1), type="n", xlab="", ylab="", axes=FALSE)
legend(0.1,0.9, legend=c(1:5), fill=rainbow(5), horiz=TRUE)

Answer 2

我过去曾使用过colorbar.plot取得了一些成功。禁用绘图（光栅（x））自动插入图例= FALSE的图例，然后调用colorbar.plot（），即

plot(raster(x),legend=FALSE)
colobar.plot(...)

将图例放置在栅格图下方并摆脱栅格图周围的矩形

2 个答案: