栅格分类光栅中的短传奇高度

Question

在绘制具有灰度分布的分类栅格地图时，例如Josh O'Brien的答案Legend of a raster map with categorical data, 传说中的高度总是变短。有没有办法将图例高度调整为与图形窗口相同的高度？

Answer 1

您可以通过将colorkey=list(height=1)传递给levelplot函数来设置图例高度。

library(raster) 
library(rasterVis) 

## Example data 
r <- raster(ncol=4, nrow=2) 
r[] <- sample(1:4, size=ncell(r), replace=TRUE) 
r <- as.factor(r) 

## Add a landcover column to the Raster Attribute Table 
rat <- levels(r)[[1]] 
rat[["landcover"]] <- c("land","ocean/lake", "rivers","water bodies") 
levels(r) <- rat 

## Plot 
levelplot(r, colorkey=list(height=1), col.regions=rev(terrain.colors(4)), xlab="", ylab="")