使用“ mapview”绘制分类栅格-如何调整图例标签？

Question

在使用mapview进行绘图时，希望能找到一种解决方案来显示分类栅格的自定义图例标签，我将不胜感激。下面是一个可重现的示例-我希望具有与用rasterVis::levelplot绘制的图中相同的图例标签（标签：“ a”，“ b”，“ c”）。在mapView（用于签名'RasterLayer'的 S4方法的小节）的帮助下，我看不到任何东西，或者我似乎缺少明显的东西。

library(raster)
#> Loading required package: sp
library(rasterVis)
#> Loading required package: lattice
#> Loading required package: latticeExtra
#> Loading required package: RColorBrewer
library(mapview)
library(RColorBrewer)

# Convert from continous raster to categorical one
my_rst <- reclassify(poppendorf[[5]], rcl = c(0.5*10^4, 1.5*10^4, 1,
                                              1.5*10^4, 1.7*10^4, 2,
                                              1.7*10^4, 2.5*10^4, 3))
my_rst <- ratify(my_rst)
# Add custom label for each class
levels(my_rst)[[1]]$label <- letters[1:3]
levels(my_rst)
#> [[1]]
#>   ID label
#> 1  1     a
#> 2  2     b
#> 3  3     c

# Custom palette
my_palette <- brewer.pal(n = 3, name = "Dark2")
my_palette
#> [1] "#1B9E77" "#D95F02" "#7570B3"

# Plot
levelplot(my_rst, col.regions = my_palette)

mapView(my_rst, col.regions = my_palette)

^{由reprex package（v0.2.1）于2019-02-26创建}