[英]R googleway: observe click circle event in Shiny
如何使用 R Shiny 中的 googleway 地图捕捉圆圈点击事件?
这是我的代码 - 基于googleway 小插图- 但是观察者不会触发。
library(tidyverse)
library(shiny)
library(googleway)
ui <- fluidPage(
google_mapOutput(outputId = "map")
)
server <- function(input, output){
map_key <- ''
output$map <- renderGoogle_map({
google_map(key = map_key) %>%
add_circles(data = tram_stops, id = "stop_id", lat = "stop_lat", lon = "stop_lon"
)
})
observeEvent(input$map_circle_click, {
cat(input$map_circle_click$id) # doesn't fire!
})
}
shinyApp(ui, server)
多边形的类似代码有效。
根据 SymbolixAU 评论
observeEvent(input$map_shape_click, {
cat(input$map_shape_click$id) # this works!
})
我怀疑这可能会在未来版本的 googleway 中改变:)
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.