使用基础R

Question

以下是使用随机数而不是真实高程数据的示例脚本。

library(gridExtra)
library(spatstat) #im function

elevation <- runif(500, 0, 10)
B <- matrix(elevation, nrow = 20, ncol = 25)
Elevation_Map <- im(B)
custom <- colorRampPalette(c("cyan","green", "yellow", "orange", "red"))
plot(Elevation_Map, col = custom(10), main = NULL)

这是我得到的情节和传奇：

这是我试图在R中重新创建的图例（这是在Word中创建的）：

我知道这是可能的，它可能是一个简单的解决方案但我尝试使用我在网上找到的一些例子无济于事。

此图（带有真实高程数据）是一个悬挂在图库中的艺术作品，高度图位于1个板上，图例位于单独的板上。我试图让R使用

绘制没有图例的情节

plot(Elevation_Map, col = custom(10), main = NULL, legend = NULL)

和我过去一样，但由于某种原因，它总是将情节与情节勾勒出来。截至目前，我正在计划将.pdf裁剪成2个单独的文件来实现这一目标。

Answer 1

原始帖子中的代码使用im包中的spatstat类。 plot命令将分派到plot.im。只需查看help(plot.im)即可了解如何控制色带。相关论点是ribargs。这是一个解决方案：

plot(Elevation_Map, col=custom(10), main="",
     ribargs=list(at=Elevation_Map$yrange, 
                  labels=c("Low Elevation", "High Elevation"),
                  las=1))