Een achtergrondkaart ophalen
Er zijn twee stappen om met ggmap een kaart aan een ggplot2-plot toe te voegen:
- Download een kaart met
get_map() - Toon de kaart met
ggmap()
Als voorbeeld pakken we een kaart van New York City:
library(ggmap)
nyc <- c(lon = -74.0059, lat = 40.7128)
nyc_map <- get_map(location = nyc, zoom = 10)
get_map() heeft meerdere argumenten die bepalen welk type kaart je ophaalt, maar voorlopig blijf je vooral bij de standaardinstellingen. Het belangrijkste argument is het eerste, location, waar je een lengte- en breedtegraad kunt opgeven om het midden van je kaart te bepalen. (Deze voor NYC hebben we snel gevonden via Google met "coordinates nyc".) Het volgende argument, zoom, is een geheel getal tussen 3 en 21 en bepaalt hoe ver de kaart is ingezoomd. In deze oefening stel je een derde argument, scale, gelijk aan 1. Dit bepaalt de resolutie van de gedownloade kaarten en je zet het lager (de standaard is 2) om de downloadtijd te verkorten.
De kaart tonen is vervolgens net zo eenvoudig als ggmap() aanroepen met je gedownloade kaart als enig argument: ggmap(nyc_map)
Jouw beurt! We gaan kijken naar huizenverkopen in Corvallis, maar waarschijnlijk heb je geen idee waar dat ligt. Laten we dat uitzoeken.
Deze oefening maakt deel uit van de cursus
Georuimtelijke data visualiseren in R
Oefeninstructies
We hebben een paar coördinaten voor je klaargezet met de naam corvallis. Haal een kaart op gecentreerd op Corvallis met de volgende zoomniveaus en gebruik ggmap() om ze te plotten. Vergeet niet scale = 1 te zetten om de downloadtijd te beperken.
zoom = 5(Corvallis ligt in de staat Oregon aan de westkust van de VS.)zoom = 13(De Willamette River stroomt door de stad, en Corvallis is de thuisbasis van Oregon State University.)
Praktische interactieve oefening
Probeer deze oefening eens door deze voorbeeldcode in te vullen.
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