Question

我想修改以下闪亮模板但运行到prolems：

http://shiny.rstudio.com/gallery/superzip-example.html

我想有两个传单地图标签，但我无法理解如何这样做，因为有两个输入，我不知道它们来自哪里。这些输入是输入$ map_bounds并输入$ goto。

如果我有两张地图，我应该有两张map_bounds。我怎么知道如何命名第二个？

很多

Answer 1

我找到了问题的答案。我确定leaflet（）函数（或者我不确定的renderLeaflet）以下列方式生成其输入：

#In ui.R
....
leafletOutput(outputId = "foo",...)
....

会给你“输入$ foo_bounds”，“输入$ foo_zoom”和“输入$ foo_click”。要测试您是否可以创建两个传单输出并在服务器端集成以下代码：

#server.R
....

output$map <- renderLeaflet({
print(names(input))
leaflet() %>%
addTiles(
urlTemplate = "//{s}.tiles.mapbox.com/v3/jcheng.map-   5ebohr46/{z}/{x}/{y}.png",
attribution = 'Maps by <a href="http://www.mapbox.com/">Mapbox</a>') %>%
setView(lng = 2.49, lat = 47, zoom = 6)})

output$map2 <- renderLeaflet({
print(names(input))
leaflet() %>%
addTiles(
urlTemplate = "//{s}.tiles.mapbox.com/v3/jcheng.map-5ebohr46/{z}/{x}/{y}.png",
attribution = 'Maps by <a href="http://www.mapbox.com/">Mapbox</a>') %>%
setView(lng = 10, lat = 47, zoom = 6)})
....

使用基于闪亮模板063的单个数据集的多个地图

1 个答案: