Inizia subitoInizia gratis

Mappa finale

Poiché la nostra mappa leaflet è costruita a livelli, possiamo aggiungere tipi di informazioni diversi sulla stessa mappa di base (ad esempio, punti e poligoni). Quando aggiungi nuovi livelli basati su dati differenti a un oggetto leaflet esistente, devi specificare l'argomento data nella funzione che crea il nuovo livello, in modo da ignorare i dati passati lungo la catena di funzioni.

m4  %>% 
    addCircleMarkers(data = private)

Combiniamo ora le mappe di punti e poligoni per aggiungere un livello che metta in evidenza gli ZIP code più ricchi degli Stati Uniti sulla nostra mappa di tutti i college americani. Per iniziare, l'ultima versione a livelli della mappa dei college m4 è stata stampata per te e lo SpatialPolygonsDataFrame wealthy_zips è già caricato.

Dopo aver creato la mappa finale, prenditi qualche minuto per esplorare (e divertirti con) la tua mappa leaflet!

Questo esercizio fa parte del corso

Mappe interattive con leaflet in R

Visualizza corso

esercizio interattivo pratico

Prova questo esercizio completando questo codice di esempio.

# Add polygons using wealthy_zips
final_map <- ___ %>% 
   addPolygons(data = ___, weight = 1, fillOpacity = .5, color = "Grey",  group = "Wealthy Zip Codes", 
              label = ~paste0("Mean Income: ", dollar(mean_income)),
              highlight = highlightOptions(weight = 5, color = "white", bringToFront = TRUE)) %>% 
    # Update layer controls including "Wealthy Zip Codes"
    addLayersControl(baseGroups = c("OSM", "Carto", "Esri"), 
                         overlayGroups = c("Public", "Private", "For-Profit", ___))
Modifica ed esegui il codice