2014-09-29 51 views
4

我正在玩閃亮應用中的傳單,我希望獲得關於我點擊的標記的信息。在這一點上,我用標記有一個很好的地圖,但是如何返回關於我點擊的標記的信息?我如何閱讀傳單中閃亮的標記數據

我server.R

library(shiny) 
library(leaflet) 
library(rgdal) 



setwd("~/github/shiny_stuff/banyuls_map/") 
####load data converted in geojson 
capteurs<-readOGR("./data/capteurs.geojson", "OGRGeoJSON") 

shinyServer(function(input, output, session) { 
    map <- createLeafletMap(session, "map") 
    session$onFlushed(once=TRUE, function() { 
    map$addMarker([email protected][,2], 
       [email protected][,1] 
       ) 
    }) 

}) 

我ui.R

library(shiny) 
library(leaflet) 



shinyUI(fluidPage(
    titlePanel("title panel"), 

    leafletMap(
    "map", "100%", 400, 
    initialTileLayer = "//{s}.tiles.mapbox.com/v3/jcheng.map-5ebohr46/{z}/{x}/{y}.png", 
    initialTileLayerAttribution = HTML('Maps by <a href="http://www.mapbox.com/">Mapbox</a>'), 
    options=list(
     center = c(42.4797, 3.1181), 
     zoom = 12 
    ) 
), 



)) 

enter image description here

回答

4

我相信你想看看在這裏找到:

input$map_marker_click 

bquast引用的示例使用input$map_shape_click 但是這是基於下面的GeoJSO包含在您加載的傳單地圖中的N個數據。

您可以使用map_marker_click返回的信息查詢您的數據並將其插入到彈出窗口中。