Je possède un jeu de données contenant des points géoréférencés. Je parviens à afficher ces points mais j'aimerai en plus intégrer un fond de carte (orthophoto, SCAN 25).
Voici un exemple de jeu de données ainsi que le code pour afficher ces points :
Code : Tout sélectionner
library(sf)
library(ggplot2)
df <- data.frame(lon = c(7.389801812, 7.382449389, 7.384940219, 7.387570357, 7.37491467, 7.37739296, 7.379973102, 7.372087193, 7.382560379, 7.385341144, 7.387903333),
lat = c(48.42369, 48.42901459, 48.4289978, 48.42880688, 48.43111324, 48.43098717, 48.43107758, 48.43283577, 48.43077007, 48.43071995, 48.43046265),
mean = c(2, 5, 8, 4, 3, 5, 7, 9, 2, 10, 9)
)
df1 <- st_as_sf(df, coords = c("lon", "lat"), crs = st_crs(df))
ggplot(df1) +
geom_sf() +
geom_point(
aes(colour = mean, size = mean, geometry = geometry),
stat = "sf_coordinates"
)
La fonction "get_map" ou "leaflet" pourrait peut-être permettre d'afficher un fond de carte (orthophoto, SCAN 25) mais je ne vois pas comment intégrer la fonction à mon script, je débute dans le domaine de la cartographie sur R.
Si vous avez des idées pour afficher des fonds de cartes derrière mes points géoréférencés je suis preneur !
Merci,
David