更改光栅堆栈中的标题

Question

我在绘制时创建了一个光栅堆栈，如下所示：

我想更改每张图表的标题，并为其添加一个主标题。

levelplot(rs, main = "MD13U0001", col.regions=rev(terrain.colors(6)), names.attr=c("LoCoH", "Elevation"))

当我尝试使用函数 levelplot 时，它给了我这个：

它将两个情节置于相同的比例，但给出了我想要的与标题相关的内容。有没有更好的功能可以给我标题，但不让天平分开？

Answer 1

示例数据

library(raster)
s <- stack(system.file("external/rlogo.grd", package="raster"))[[1:2]]

设置图层名称和默认绘图

names(s) <- c("Apple", "Mango")
plot(s, cex.main=.8)

一些示例自定义

par(mar=c(3,3,5,5), mfrow=c(1,2))
for (i in 1:2) {
    plot(s[[i]], cex.axis=.75, las=1)
    title(names(s)[i], line=0.5, cex.main=0.8)
}
text(-40, 100, "These are my maps", xpd=NA, cex=2)

更改光栅堆栈中的标题

Changing the titles within a raster stack

plot

r

raster

r-raster