如何为R语言中levelplot的colorkey添加水平标题？

要将底部colorkey的标题设置为水平方向，只需把myColorkey中的title从字符串改为包含label和rot参数的列表，其中rot=0表示标题不旋转（水平显示）。

修改后的完整代码：

library(raster)
library(rasterVis)

r <- raster(ncol=10,nrow=10)
r[] <- sample(c(1:3),size=100,replace=T)
r1 <- raster(ncol=10,nrow=10)
r1[] <- sample(c(1:9),size=100,replace=T)
r2 <- raster(ncol=10,nrow=10)
r2[] <- sample(c(5:15),size=100,replace=T)
r3 <- raster(ncol=10,nrow=10)
r3[] <- sample(c(3:35),size=100,replace=T)
s <- stack(r,r1,r2,r3)

breaks <- 7
my.at <- round(seq(min(minValue(s)), max(maxValue(s)), length.out = breaks),digits=2)
# 修改title为带rot参数的列表，rot=0设置水平标题
myColorkey <- list(space = "bottom",
                   title=list(label="some number of days", rot=0),
                   at=my.at,
                   height=0.95, 
                   width=1, 
                   labels=list(at=my.at,cex=1.1))
levelplot(s,at=my.at,colorkey = myColorkey)

关键修改说明 #

• 原代码中title是普通字符串，默认会根据colorkey的位置自动调整旋转角度（底部colorkey默认标题垂直）。
• 将title定义为包含label（标题文本）和rot（旋转角度）的列表，rot=0强制标题水平显示，rot=90则为垂直（默认行为）。

内容的提问来源于stack exchange，提问作者code123