library(leaflet.esri)
## Loading required package: leaflet
## Loading required package: leaflet.extras
l <- leaflet() %>%
setView(-87.0369, 28.9072, 5) %>%
addEsriBasemapLayer(esriBasemapLayers$Imagery) %>%
addEsriDynamicMapLayer(
url='http://portal.gulfcouncil.org/arcgis/rest/services/CoralWorkingGroup/GoliathGrouper/MapServer',
options=dynamicMapLayerOptions(layers=0) )
## I was expecting the options argument to only add a single layer from the map service
## but not getting the expected output. All layers are displayed.
l