如何手动改变传单地图/R中的不同颜色？

Question

我制作了一张丹麦地图

library(leaflet.extras)
library(leaflet)

#Data

folk1 <- readr::read_csv2("http://api.statbank.dk/v1/data/folk1a/CSV?OMR%C3%85DE=*")


municipalityDK("INDHOLD","OMRÅDE",data=folk1,legend=T,pal = "GnBu") %>%
  setMapWidgetStyle(list(background= "white"))

看上去像是：

​

​

然而，我没有成功地找到一个颜色调色板，使数据以我喜欢的方式可视化。我用过那些列出的这里。

我希望调色板看起来像这样：

​

​

这能手动完成吗？

Answer 1

您可以使用RColorBrewer创建自定义调色板。

library(RColorBrewer)

colfunc <- colorRampPalette(c("#2C77BF", "red"))

然后在地图中包括您的自定义调色板和选定颜色数：

municipalityDK("INDHOLD","OMRÅDE",data=folk1,legend=T,pal = colfunc(10)) %>%
  setMapWidgetStyle(list(background= "white"))

地图

​

​