R闪亮:谷歌软件包-在更新期间关闭自动缩放和平移

Question

使用带有Shiny的googleway R包，并使用google_map_update和update_heatmap更新地图。

在调用google_map_update的过程中，是否可以保持相同的缩放级别和位置？目前，当点更改坐标时，它会自动缩小和平移，这让人头疼。可以关闭吗？

下面的代码来自链接，滑块已启用自动化。放大地图，然后设置动画，您将看到自动缩放和平移发生。

library(shiny)
library(googleway)
ui <- fluidPage(
sliderInput(inputId = "sample", label = "sample", min = 1, max = 10,
step = 1, value = 10, animate = TRUE),
google_mapOutput(outputId = "map")
)
server <- function(input, output){
map_key <- ''
set.seed(20170417)
df <- tram_route[sample(1:nrow(tram_route), size = 10 * 100, replace = T), ]
output$map <- renderGoogle_map({
google_map(key = map_key) %>%
add_heatmap(data = df, lat = "shape_pt_lat", lon = "shape_pt_lon",
option_radius = 0.001)
})
observeEvent(input$sample,{
df <- tram_route[sample(1:nrow(tram_route), size = input$sample * 100, replace = T), ]
google_map_update(map_id = "map") %>%
update_heatmap(data = df, lat = "shape_pt_lat", lon = "shape_pt_lon")
})
}
shinyApp(ui, server)

Answer 1

当然！

使用update_map_view = FALSE

---

文档

?update_heatmap

update_map_view-逻辑指定地图是否应根据形状重新居中

---

示例

google_map_update(map_id = "map") %>%
update_heatmap(
data = df
, lat = "shape_pt_lat"
, lon = "shape_pt_lon"
, update_map_view = F
)

事实上，我现在建议始终使用update_map_view = FALSE，因为它(对于浏览器(更节省内存，因为您不需要不断更新映射"边界"的数组。但我还没有在任何地方正式记录这一点。