Leaflet et Geoportail

Postez ici vos questions, réponses, commentaires ou suggestions - Les sujets seront ultérieurement répartis dans les archives par les modérateurs

Modérateur : Groupe des modérateurs

Antoine QUENTIN
Messages : 1
Enregistré le : 22 Mar 2017, 08:10

Leaflet et Geoportail

Messagepar Antoine QUENTIN » 23 Jan 2018, 14:19

Bonjour,

Je souhaiterais utiliser un fond de carte venant du site géoportail, mais je n'arrive pas à configurer l'option "addWMSTiles" du package "Leaflet".

Voici un exemple trouvé sur le web qui marche avec le géoportail allemand :

Code : Tout sélectionner

leaflet() %>% addTiles() %>% setView(7.5, 51.5, zoom = 7) %>%
   addWMSTiles("http://www.wms.nrw.de/gd/guek500",
layers = c(0), options = WMSTileOptions(format = "image/png", transparent = TRUE),
attribution = "© <a href='https://www.geoportal.nrw.de'>geoportal.nrw.de</a>")


Mon code à ce stade

Code : Tout sélectionner

leaflet() %>% addTiles() %>% setView(1, 45, zoom = 5) %>%
   addWMSTiles("http://geoservices.brgm.fr/geologie",
               layers = "SCAN_F_GEOL250",
               options = WMSTileOptions(format = "image/png", transparent = TRUE))


Si quelqu'un à une piste, je lui en serais très reconnaissant
CoRdialement,
Antoine

liens utiles:
https://depot.ign.fr/geoportail/api/dev ... _mxml.html
https://geoservices.ign.fr/documentatio ... aflet.html

Jean-Christophe Steinbach
Messages : 7
Enregistré le : 14 Déc 2013, 12:56

Re: Leaflet et Geoportail

Messagepar Jean-Christophe Steinbach » 22 Fév 2018, 23:24

Bonjour,
Un pare feu sur la machine?
https://depot.ign.fr/geoportail/api/dev ... rview.html

De plus il faut une clef de l'IGN , non? et certainement redefinir les option d'acces avec providerTileOptions()
https://rstudio.github.io/leaflet/basemaps.html


Cordialement

Muriel Malleret
Messages : 1
Enregistré le : 03 Avr 2018, 07:42

Re: Leaflet et Geoportail

Messagepar Muriel Malleret » 03 Avr 2018, 08:38

Bonjour,

Le pb est il résolu SVP ? Car je bute sur la même difficulté ...
Merci d'avance pour le partage de la solution ... si vous l'avez
Cdt

Michaël Delorme
Messages : 67
Enregistré le : 04 Avr 2016, 10:21

Re: Leaflet et Geoportail

Messagepar Michaël Delorme » 09 Avr 2018, 09:32

Pour les couches IGN du Géportail (ceci répond au titre de la question mais pas tout à fait au contenu de la question initiale qui utilise des couches du BRGM, mais cela peut servir aux personnes qui viennent de moteurs de recherche !)...

Il faut bien indiquer la clé d'API IGN et les paramètres de la pyramide : TILEMATRIXSET que l'on trouve dans le getCapabilities et utiliser TILEMATRIX, TILEROW et TILECOL avec les variables {x}, {y} et {z}.

Voir sur https://geoservices.ign.fr/documentation/utilisation_web/wmts-leaflet.html.

Par exemple en partant d'un dataframe avec des coordonnées en L93 avec le SCAN Express :

Code : Tout sélectionner

library(tidyverse)
library(sf)
library(leaflet)


tibble(x = c(907055, 899847, 910304),
       y = c(6551991, 6552639, 6556673),
       valeur = c(1, 2, 3)) %>%
  st_as_sf(coords = c("x", "y"), crs = 2154L) %>%
  st_transform(4326L) %>%
  leaflet() %>%
  addTiles("http://wxs.ign.fr/******MA_CLE_IGN******/wmts?REQUEST=GetTile&SERVICE=WMTS&VERSION=1.0.0&STYLE=normal&TILEMATRIXSET=PM&FORMAT=image/jpeg&LAYER=GEOGRAPHICALGRIDSYSTEMS.MAPS.SCAN-EXPRESS.STANDARD&TILEMATRIX={z}&TILEROW={y}&TILECOL={x}",
           options = WMSTileOptions(tileSize = 256),
           group = "IGN") %>%
  addProviderTiles("Esri.WorldTopoMap", group = "ESRI Topo") %>%
  addProviderTiles("Esri.WorldImagery", group = "ESRI Ortho") %>%
  addLayersControl(baseGroups = c("IGN", "ESRI Topo", "ESRI Ortho")) %>%
  addCircleMarkers(popup = ~ as.character(valeur),
                   fillOpacity = 1)


Retourner vers « Questions en cours »

Qui est en ligne

Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 1 invité