Question

只要鼠标指针悬停在传单地图上，浏览器就不会向上或向下滚动。即使我将minZoom和maxZoom附加到相等的值，也会发生这种情况。有解决方案吗？

php.poverty.map.2009 <-
leaflet(options = leafletOptions(minZoom = 12, maxZoom = 12)) %>%
addProviderTiles("CartoDB.Positron") %>%
addPolygons(data = php.df.polygon.2009, 
          fillColor = ~php.pal.2009(percent), 
          color = "#b2aeae", # must use hex colors
          fillOpacity = 0.7, 
          weight = 0.3, 
          smoothFactor = 0.2,
          popup = php.popup.2009) %>%
addLegend(pal = php.pal.2009, 
        values = php.df.polygon.2009$percent, 
        position = "bottomright", 
        title = "Percent of Households <br> Living below Poverty <br> (Census, 2009)",
        labFormat = labelFormat(suffix = "%"))
php.poverty.map.2009

Answer 1

我认为你的缩放选项可能需要在providerTiles函数中。即addProviderTiles("CartoDB.Positron", options = providerTileOptions(minZoom=12, maxZoom=12))

Answer 2

Leaflet地图有一个documented scrollWheelZoom option，允许您禁用滚轮交互（但仍允许其他方式缩放地图，例如缩放按钮）。

在普通的Javascript中，它的使用方式与var map = L.map({ scrollWheelZoom: false })类似。我不熟悉R，但您应该尝试leaflet(options = leafletOptions(scrollWheelZoom = false))或其变体。

Answer 3

在我第二次尝试回答这个问题时，我遇到了leaflet.extras包，它在R中实现了一系列传单插件。其中一个是Leaflet.Sleep插件，可以通过添加{来实现{1}}函数到R的传单地图。

基本示例

首先，使用suspendScroll()安装leaflet.extras。

devtools::install_github('bhaskarvk/leaflet.extras')

有关示例，请参阅this page。

传单地图阻止浏览器滚动

3 个答案:

基本示例