在传单中手动添加图例值

Question

我在 Leaflet 和运行中将各种英国选举的结果绘制成传说中的一个问题。

对于大选中的各种结果，我对不同的数据使用不同域的相同颜色函数（图中的黄色->紫色比例）

这是用（以前两个为例）创建的：

labvotescols <- colorNumeric(
  c("Yellow", "Purple"),
  domain = Westminster$LabourVotes,
  ukipvotescols <- colorNumeric(
    c("Yellow", "Purple"),
    domain = Westminster$UKIPVotes,

等等...

目前我有图例

map = map %>% addLegend("bottomright", pal = ukipvotescols, values = Westminster$UKIPVotes,
                    title = "(e.g.) % voting UKIP at GE2015",
                    opacity = 1)

作为这方面的一个例子，但我真的想去掉图例中的所有值，只在黄色一端有 "less"，在紫色一端有 "more"。这可能吗？

我试过玩，然后谷歌搜索但无济于事。

Answer 1

您可以将它从黄色-> 紫色比例更改并制作您自己的比例：

map = map %>% addLegend("bottomright", 
  colors =c("#FFC125",  "#FFC125", "#8A4117", "#7D0552", "#571B7E"),
  labels= c("less", "","","","", "more"),
  title= "(e.g.) % voting UKIP at GE2015"
  opacity = 1)

如果你得到正确的颜色，那么它应该看起来很相似。不是您正在寻找的答案，但这是一个很好的解决方法。您的输出将如下所示：

花更多时间寻找更好的颜色过渡，您可能会得到一个看起来类似于您在上面的黄紫色调色板的图例。

在传单中手动添加图例值

Manually adding legend values in leaflet

r

legend

palette

leaflet