shiny+leafletで地図上の緯度経度を取得
地図上をクリックするとleafletOutput()
のoutputId_click(ここではmap_click)に緯度経度が格納される。
library(shiny)
library(leaflet)
rm(list=ls())
lng <- 135
lat <- 35
ui <- fillPage(
leafletOutput(outputId="map", height="100%"),
absolutePanel(bottom=10, left=10,
tableOutput(outputId="table")
)
)
server <- function(input, output, session){
output$map <- renderLeaflet({
leaflet() %>%
addTiles() %>%
setView(lng=lng, lat=lat, zoom=15)
})
observeEvent(input$map_click, {
output$table <- renderTable({
as.data.frame(input$map_click)
})
})
}
shinyApp(ui=ui, server=server)
Degree Confluence Projectって知ってる?
http://confluence.org/confluence.php?lat=35&lon=135
Author And Source
この問題について(shiny+leafletで地図上の緯度経度を取得), 我々は、より多くの情報をここで見つけました https://qiita.com/yono2844/items/5be959e58c98c16003a6著者帰属:元の著者の情報は、元のURLに含まれています。著作権は原作者に属する。
Content is automatically searched and collected through network algorithms . If there is a violation . Please contact us . We will adjust (correct author information ,or delete content ) as soon as possible .