R - 繪製柵格時移動圖例的最簡單方法

Question

我需要繪製柵格文件。

在我的輸出圖像中，圖例上的數字有時不可見 - 特別是當我將圖形窗口分割成兩列或更多列時（例如：par（mfrow = c（1,2））））。

我想過將圖例移動到底部（下面的柵格圖像）來解決此問題。 但是，我發現的大多數示例都建議使用全新的顏色和項目定義創建全新的圖例。

我想使用默認的圖例。我只需要將它移到底部。我試圖做到這一點，如下所示：

library('raster') 
data(volcano) 
r <- raster(volcano) 
# Trying to draw default legend below raster plot 
plot(r, legend=F) 
# Now trying to draw legend. Default is okay for me, I want to move it below only: 
plot(r, legend.only=TRUE, legend.args=list("bottom", text='My values [m^3]')) 

不幸的是，我的代碼不工作（好像沒有使用「底」參數）。

Answer 1

Here是使用rasterVis方式：spplot

library(rasterVis) 
levelplot(r, margin=FALSE, colorkey=list(space="bottom"), par.settings = RdBuTheme()) 

Answer 2

或者嘗試，它也使用包lattice：

spplot(r, scales = list(draw = TRUE), colorkey = list(space = "bottom"))