Question

我是Shiny的新手，我正在玩geoExplorer。这个应用程序结合了反应ggvis和Leaflet。

当您点击数据点时，会有一个弹出标签，其中包含我们可能选择的输入变量的信息： https://github.com/davesteps/geoExploreR

我的问题是：除了输入/输出之外，我如何在此程序中包含点击点的附加信息？例如，为我们点击的点添加一个标识符，该标识符可以包含在相同或辅助数据帧中。

希望这是有道理的！

Answer 1

您正在查找的函数addPopups()，或者如果要将弹出窗口附加到传单中的标记，请在marker命令中使用popup参数。例如，如果您从存储在名为mydat的空间点数据框中的数据制作地图，并且您希望在弹出窗口中包含数据列V1：V5作为文本，那么您的代码可能看起来像：

map = leaflet(data = mydat) 
map = addTiles(map)
map %>%
    addCircleMarkers(map,
        lng = longitude, # longitude
        lat = latitude, # latitude
        radius = 4, # fixed radius size
        color = ~pal(Result),
        popup = paste(mydat$Var1, " more text", "<br>",
              "Var2: ", mydat$Var2, "<br>",
              "Var3: ", mydat$Var3, "<br>",
              "Var4: ", mydat$Var4, "<br>",
              "Var5: ", mydat$Var5))
      )

您可以自定义弹出窗口中的文本，以便显示数据框中的数据。

一个很棒的（但有限的）资源是R小册子的网页，其中包含弹出窗口：https://rstudio.github.io/leaflet/popups.html

这是传单的个人示例，我使用弹出窗口显示大量信息。 http://rpubs.com/richpauloo/Tulare_maps_v2。有一个指向github仓库的链接，您可以在其中查看源数据并自行运行。

在弹出标签中添加自定义信息：geoExploreR

1 个答案: