如何增加栅格图例标签的大小并使它们加粗？

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))