我正在使用传单和shinydashboard创建 Shiny 的应用程序,该应用程序有多个菜单,这些菜单存在leafletProxy
问题。
在这里,我创建了最小的示例来展示我的问题( https://gist.github.com/byzheng/074c3c1ff75ea9f951f5 )。
在应用程序中,有两个侧边栏菜单 1) 第一个菜单有一个链接 click me
; 2)第二个菜单有传单图。在第一页点击click me
后,启用第二页,然后setView
传单 map 到随机位置。
问题是第一次点击click me
时,js控制台出现错误消息Couldn't find map with id map
并且leafletProxy
被调用。
我认为这个问题与加载 Shiny 应用程序时传单 map 未初始化有关。单击多次后,一切都按预期工作。
所以我的问题是如何在Shiny应用程序加载时强制Shiny绘制传单 map 。
感谢您的任何建议。
最佳答案
这里的问题是,当 output$map
隐藏时,创建传单 map 的代码被挂起。
解决此问题的一种方法是使用:
outputOptions(output,"map",suspendWhenHidden=FALSE)
不幸的是,这现在似乎有问题,但很快就能修复,它目前会抛出一个 js 错误( see here )。
由于 output$summary
似乎是在 renderLeaflet
之后运行,因此您可以在该 block 中使用 setView
作为临时解决方案。
output$summary <- renderPrint({
leafletProxy('map') %>% setView(runif(1) * 30 +2, runif(1) * 30 + 2, 7)
print(input$mydata)
print(leafletProxy('map')$id)
})
关于r - 当 Shiny 的应用程序加载时强制更新输出,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/35653149/