0

我正在使用函数 densityplot() 和 grid.arrange(),这是示例:

library(rasterVis)
library(gridExtra)
library(raster)

f <- system.file("external/test.grd", package="raster")
r <- raster(f)
data<-stack(r,r*2,r/3,r+100,r,r*2,r*2,r/3,r+100,r,r-10,r)
names(data) <- month.abb
a<- densityplot(data[[1:3]],main="title 1")
b<- densityplot(data[[4:6]],main="title 2")
c<- densityplot(data[[7:9]],main="title 3")
d<- densityplot(data[[10:12]],main="title 4")

grid.arrange(a,b,c,d,ncol=2,top="main title ")

使用此代码,我的输出是:

输出 1

没有显示“title 1”,“title 2” .... 与我的数据一起使用的输出是:

输出 2

equal 不显示密度图的主标题和标签(“Jan” “Feb” “Mar” “Apr” ....)

有可能请指导我。

谢谢你!!

4

0 回答 0