Hinzufügen von WMS zu Leaflet

Question

Ich habe versucht, diese Karte (unten) in Broschüre in R als Layer über das WMS der National Map zu bekommen, hatte aber keinen Erfolg.

https://raster.nationalmap.gov/arcgis/services/LandCover/USGS_EROS_LandCover_NLCD/MapServer/WMSServer?request=GetMap&service=WMS&Version=1.3.0&BBOX=-14497453.9,248608.9,-7087933.9,6960328.9&Styles=&Format=image/png&layers=33&crs=EPSG:3857&width=600&height=400&Transparent=true

Hier ist mein Code:

map <- leaflet() %>% addTiles() %>% 
addWMSTiles(baseUrl="https://raster.nationalmap.gov/ArcGIS/services/LandCover/USGS_EROS_LandCover_NLCD/MapServer/WMSServer?", 
layers = "33", 
group = "NLCD", 
options = WMSTileOptions(
format = "image/png", 
version = "1.3.0", 
transparent = TRUE)) %>% 
addLayersControl(
overlayGroups = c("NLCD"), 
position = 'bottomleft') 

map 

Answer 1

ich das Problem gefunden. Als ich mir die RStudio-Viewer-Konsole anschaute, war für jedes Raster-Image "Ressource konnte nicht geladen werden: Konnte SSL-Kontext nicht initiieren:". Wenn jemand anderes dagegen ankämpft, ist es ein Problem mit dem RStudio-Viewer und sie arbeiten gerade an einer Lösung. Es sollte korrekt angezeigt werden, wenn Sie es als HTML in einem Browser ausführen. Das Gleiche gilt für Shiny.