使用R中“rasterVis”包中的levelplot函数绘制仅有2个像素的栅格

Question

我试图使用“rasterVis”包中的levelplot函数绘制下面的栅格，但所有这些都给了我一条直线。我尝试使用“at”命令给图例赋予不同的中断但是没有我尽力在文档中尝试但无法找到答案。 此外，光栅使用R中的“plot（）”和“image（）”命令进行绘图。请帮助。

data.entry_data.ProfileData[0].userspecific

plot of the output from levelplot

修改1 当我定义没有范围和投影的栅格时，栅格与水平图一起很好地绘制。我无法找到原因。

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)    

plot of raster r2

Answer 1

如果使用resolution，则忽略参数ncols和nrows。删除resolution和nrow以用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)