更改光栅堆栈中的标题

如何解决更改光栅堆栈中的标题

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

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

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

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

它把两个情节放在相同的比例，但给了我我想要的关于标题的东西。有没有更好的功能可以给我标题，但不能将比例分开？

解决方法

示例数据

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)