Javascript R闪亮传单：设置zoomDelta和zoomSnap

提前感谢您的帮助

我需要更改缩放按钮（+/-）控件在R中的传单贴图中使用的粒度。如果你熟悉JS，这可能是一件非常容易的事情，但是，我不是，所以我需要一些帮助。我看到有人问过类似的问题，但没有答案

我看到：

var map = L.map('map', {
    zoomDelta: 0.25,
    zoomSnap: 0
});

是在JS中实现这一点的方法

我尝试了以下（我尝试的基本版本）：

图书馆（传单）
图书馆（htmltools）
库（htmlwidgets）
图书馆（闪亮）
预期的结果是什么？你的第二个例子似乎有效。第二个选择对我也有效。
library(leaflet)
library(htmltools)
library(htmlwidgets)
library(shiny)


ui <- fluidPage(
  leafletOutput("mymap")
)

server <- function(input, output, session) {


  output$mymap <- renderLeaflet({
    leaflet() %>%
      addProviderTiles(providers$Stamen.TonerLite,
                       options = providerTileOptions(noWrap = TRUE)
      ) %>%
      onRender("function(el, x){var map = L.map('map', {zoomDelta: 0.25, zoomSnap: 0});}")
  })
}

shinyApp(ui, server)

library(leaflet)
library(htmltools)
library(htmlwidgets)
library(shiny)


ui <- fluidPage(
  leafletOutput("mymap")
)

server <- function(input, output, session) {


  output$mymap <- renderLeaflet({
    leaflet(options = leafletOptions(zoomSnap = 0.01, 
                                     zoomDelta = 0.01
    )) %>%
      addProviderTiles(providers$Stamen.TonerLite,
                       options = providerTileOptions(noWrap = TRUE)
      ) 
  })
}

shinyApp(ui, server)