r - 如何增加光栅图例标签的大小并使它们变粗？

Question

我想绘制一个光栅文件。

library(colorRamps) 
library(raster) 

r <- raster(nrows=5, ncols=5, vals=1:25)
plot(r, col =  matlab.like(8))

这产生

如您所见，图例中有从 5 到 25 的数字。这些数字不是很清楚，所以我想增加它们的大小以使其清晰并加粗。谢谢

Answer 1

您可以将 axis.args 和 legend.args 作为参数传递给仅图例函数调用，就像 fields 包中的 image.plot 一样。

例如，要指定刻度位置和标签，它还会接受 legend.width 和 legend.shrink 等参数。

plot(r, col=topo.colors(100), legend=TRUE, axes=TRUE)
r.range <- c(minValue(r), maxValue(r))
plot(r, legend.only=TRUE, col=topo.colors(100),
     legend.width=1, legend.shrink=0.75,
     axis.args=list(at=seq(r.range[1], r.range[2], 25),
                    labels=seq(r.range[1], r.range[2], 25), 
                    cex.axis=0.6),
     legend.args=list(text='Elevation (m)', side=4, font=2, line=2.5, cex=0.8))