r - R 传单 addRasterImage 在高于 18 的缩放时不起作用

Question

我想将该addRasterImage()函数用于 R 中的传单对象。

然而，它似乎只能达到 18 的缩放级别。请参见下面的示例。

 library(raster)
 library(leaflet)
 library(magrittr)

 r <- raster(xmn=-2.8, xmx=-2.79, ymn=54.04, ymx=54.05, nrows=30, ncols=30)
 values(r) <- matrix(1:900, nrow(r), ncol(r), byrow = TRUE)
 crs(r) <- CRS("+init=epsg:4326")

 leaflet() %>% addTiles() %>%
   setView(lat=54.045,lng=-2.795,zoom=19) %>%
   addRasterImage(r, colors = "Spectral", opacity = 0.8)

我知道该addTiles()功能自然只能显示缩放至 18 的图块，但我假设光栅图像仍应以更高的缩放级别显示。此外，还有其他切片提供商（例如 HERE）的缩放级别确实高于 18，但传单对象上缺少光栅图像的问题仍然存在。

任何帮助将不胜感激。