地图传单上的标记为闪亮

Question

当用户在闪亮的应用程序中单击此地图时，是否有办法在传单地图上设置可见标记（复数）？此外，是否可以检索此标记的坐标？

如果没有光泽，你可以在传单JS吗？

Answer 1

没有任何代码很难具体，但这里有基础知识。

1）Shiny / Leaflet允许您订阅鼠标点击等事件。如果您的地图名为MyMap，则可以使用以下代码：

ClickVar<-input$MyMap_click  

然后ClickVar是一个反应变量 - 一个列表，包括lat，long和layerId。

现在你有了lat和long，你可以用它来添加你的弹出窗口。在observerEvent这样做所有这些：

observeEvent( input$MyMap_click, {
    ClickVar<-input$MyMap_click
    addPopups(MyMap, lng=ClickVar$lng, lat=ClickVar$lat, popup="Here I am")
})

注意 - 我没有对此进行过测试，因此您可能需要稍微改动一下。您可能还想考虑在点击其他弹出窗口时删除一个弹出窗口，为其分配layerID或group等。