Récupérer une carte d'arrière-plan
Il y a deux étapes pour ajouter une carte à un graphique ggplot2 avec ggmap :
- Télécharger une carte avec
get_map() - Afficher la carte avec
ggmap()
À titre d'exemple, prenons une carte de New York :
library(ggmap)
nyc <- c(lon = -74.0059, lat = 40.7128)
nyc_map <- get_map(location = nyc, zoom = 10)
get_map() offre plusieurs arguments pour contrôler le type de carte à récupérer, mais pour l'instant vous utiliserez surtout les valeurs par défaut. L'argument le plus important est le premier, location, où vous pouvez fournir une paire de coordonnées de longitude et de latitude pour centrer la carte. (Nous les avons trouvées pour NYC avec une recherche rapide sur Google de « coordinates nyc ».) L'argument suivant, zoom, prend un entier entre 3 et 21 et contrôle le niveau de rapprochement de la carte. Dans cet exercice, vous allez définir un troisième argument, scale, à 1. Cela contrôle la résolution des cartes téléchargées, et vous la réduirez (la valeur par défaut est 2) pour diminuer le temps de téléchargement.
Affichez ensuite la carte simplement en appelant ggmap() avec votre carte téléchargée comme seul argument : ggmap(nyc_map)
À vous de jouer ! Nous allons examiner les ventes de maisons à Corvallis, mais vous ne savez probablement pas où c'est ! Découvrons-le.
Cette activité fait partie du cours
Visualiser des données géospatiales avec R
Instructions de l’exercice
Nous avons préparé pour vous une paire de coordonnées appelée corvallis. Obtenez une carte centrée sur Corvallis aux niveaux de zoom suivants et utilisez ggmap() pour tracer chacune d'elles. N'oubliez pas de définir scale = 1 pour réduire le temps de téléchargement.
zoom = 5(Corvallis se trouve dans l'État de l'Oregon, sur la côte Ouest des États-Unis.)zoom = 13(La rivière Willamette traverse la ville, et Corvallis est le siège de l'Oregon State University.)
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
corvallis <- c(lon = -123.2620, lat = 44.5646)
# Get map at zoom level 5: map_5
map_5 <- get_map(___, zoom = ___, scale = 1)
# Plot map at zoom level 5
ggmap(___)
# Get map at zoom level 13: corvallis_map
corvallis_map <- ___
# Plot map at zoom level 13