R Leaflet地图-添加多边形地理标签

Question

我是一位有用的助手，将为您翻译以下内容：“我正在制作一个R地图，在这张地图上，每个人口普查区都有相应的数字。是否可以使标签显示在地图上，无论是在滚动中还是通过图层控制单选按钮？”

“这些标签已经包含在形状文件中：”

map1<-leaflet()%>%
  addTiles()%>%

addPolygons(data = plotMerge,
          fillColor = ~pal(plotMerge$incomePerCapita),
          color = "#000000", #this is an outline color hoping to
          fillOpacity = 0.8, # add the labels inside this outline
          weight = 0.2,
          popup=popup)%>%
addLegend(pal = pal,
            values  = plotMerge$incomePerCapita,
            position = "bottomright",
            title = "State-wide Income Percentiles",
            labFormat = labelFormat(digits=1))

saveas(map1, "map1.html")
map1

- sconfluentus

---

你能分享一些数据，这样我就可以重新创建地图吗？我知道你可以在leaflet中创建弹出窗口。 - Raphael K

我可以...但是这是一个非常大的文件...今晚我会编辑一些内容，使得症状能够被重现，而不需要让任何人下载1GB的数据并筛选200多行代码。谢谢... - sconfluentus

是的，我理解。虽然我已经有一段时间没有使用过leaflet了，但我很乐意尝试帮忙。当时我使用它时感觉非常愉快。 - Raphael K

Leaflet的Github版本有这个选项。您可以在addPolygons中将字符向量简单地传递给label =参数。 - TimSalabim

谢谢Tim！如果你需要在堆栈射击游戏中获得小熊玩具的积分，请随意将此作为答案...我会给你一个勾号和另一个赞！ - sconfluentus

不错的优惠@bethanyP，但我对名声不感兴趣 :-) - TimSalabim

Answer 1

一种方法是使用addPolygons中的highlight选项，像这样：

leaflet(df) %>% addTiles() %>%
addPolygons(data=df,weight=.85,
    highlight = highlightOptions(
    weight = 5, color= "#666",
    dashArray = "", fillOpacity = 0.7,
    bringToFront = TRUE),
   label=~df$labelyouwant)

当您将鼠标悬停在多边形上时，标签将出现。

- Ben