title: R Leaflet: Zoom Control Level
body: <p>I am trying to set zoom out maximum in my R Leaflet map. I follow an example of a previous question/answer in <a href="https://stackoverflow.com/questions/35556197/prevent-zooming-out-in-leaflet-r-map">Prevent zooming out in leaflet R-Map?</a>  , but it doesn't work. The line that should be able to do this is:</p>
  
  <pre><code>options = providerTileOptions(minzoom = 1, maxzoom = 10))
  </code></pre>
  
  <p>Can you guys can help me to figure out why?</p>
  
  <p>Here is code:</p>
  
  <pre><code> deck_lf_par_map &lt;- leaflet(lpoints) %&gt;%
                 addPolygons(data = dio, noClip=T,
                             weight = 4,
                             dashArray="5, 1",
                             color = "black",
                             fillOpacity = .01,
                             smoothFactor = 0) %&gt;%
                 setView(lng = mean(lpoints$long), lat = mean(lpoints$lat), zoom = 09) %&gt;%
                 addProviderTiles("Stamen.TonerLite",
                                  group = "Toner", 
                                  options = providerTileOptions(minzoom = 1, maxzoom = 10)) %&gt;%
                 addTiles(group = "OSM") %&gt;%
                 addProviderTiles("Esri.WorldTopoMap",    
                                  group = "Topo") %&gt;%
                 addProviderTiles("OpenStreetMap.Mapnik", group = "Mapnik") %&gt;%
                 addProviderTiles("CartoDB.Positron",     group = "CartoDB") %&gt;%
                setMaxBounds((dioc@bbox[1,1] - .3), 
                             (dioc@bbox[2,1] - .3), 
                             (dioc@bbox[1,2] + .3), 
                             (dioc@bbox[2,2] + .3)) %&gt;%
                addMarkers(lpoints$long, 
                           lpoints$lat, 
                           popup=ppopup, 
                           icon = tec_icon, 
                           group="Parishes", 
                           clusterOptions = markerClusterOptions()) %&gt;%
               addLayersControl(baseGroups = c("Toner", "OSM", "Topo", "Mapnik", "CartoDB"),
                         options = layersControlOptions(collapsed = TRUE))
  </code></pre>