使用R中的“ rasterVis”包中的levelplot函數僅繪制2個像素的柵格

Question

我試圖使用“ rasterVis）包中的levelplot函數繪制以下柵格，但是這給了我一條直線。我嘗試使用“ at”命令給圖例提供不同的中斷，但無濟於事。盡我所能嘗試了文檔中的內容，但找不到答案。此外，使用R中的“ plot（）”和“ image（）”命令可以很好地繪制柵格。

library(raster)
library(rasterVis)
sr <- "+proj=utm +zone=12 +datum=NAD83 +units=m +no_defs +ellps=GRS80 +towgs84=0,0,0"
r <- raster(resolution =c(24600, 28900), crs = sr, nrows = 1, ncols = 2, ext = extent(c(573800, 623000, 3508713, 3537613)))
r[] <- c(1,2)
levelplot(r, margin = FALSE)    

levelplot的輸出圖

編輯1當我定義沒有范圍和投影的柵格時，則使用levelplot可以很好地繪制柵格。 我找不到原因。

r2 <- raster(nrows =1, ncols =2)
r2[] <- c(1, 2)
levelplot(r2, margin = FALSE)

柵格r2的圖

Answer 1

如果使用resolution ，則忽略參數ncols和nrows 。 刪除resolution並向上nrow以使用levelplot對其進行levelplot 。

library(raster)
library(rasterVis)
sr <- "+proj=utm +zone=12 +datum=NAD83 +units=m +no_defs +ellps=GRS80 +towgs84=0,0,0"
r <- raster(ncol = 2, crs = sr, ext = extent(c(573800, 623000, 3508713, 3537613)))
r[] <- c(1, 2)
levelplot(r, margin = FALSE)