我和其他人已经构建了一个在线应用程序的原型，以帮助交通规划人员优先考虑自行车道的新资金：

https://robinlovelace.shinyapps.io/fixMyPath/

我们对结果很满意，并对 Shiny 无需编写一行 JavaScript 即可快速为 Web 部署概念制作原型的能力印象深刻。但是，该应用程序有一个主要问题，您可以通过放大然后调整透明度滑块来看到：每次执行此操作时，缩放都会重置。因此，问题很简单：如何重写 server.R ，以便地图不会重置其缩放设置？

整个应用程序可以在下面的链接中看到，并且可以在任何 R 安装上重现，只要您拥有正确的软件包（例如 rgdal、leaflet、ggmap）：

https://github.com/nikolai-b/hackMyRoute/tree/master/R/fixMyPath

有关更多上下文，请参阅 这里 。