如何为栅格增加图例标签的大小并使其变粗？

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 作为参数传递给仅图例功能调用，就像字段包中的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))