Inizia subitoInizia gratis

Facciamo un po' di logging

Vediamo i quartili dei redditi medi per CAP in NC.

summary(high_inc$mean_income)

   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
  55947   62380   71655   83682   90695  550849

L'intervallo è quasi di $500.000! Tuttavia, la mediana è molto più vicina al minimo che al massimo, indicando una asimmetria a destra. Poiché la variabile del reddito medio contiene valori eccezionalmente alti, il gradiente di colore continuo non è molto utile. Applicare il logaritmo a una variabile con asimmetria a destra avvicina i valori grandi alla media e produce una distribuzione più simmetrica.

Applicare la trasformazione logaritmica al reddito medio sulla nostra mappa aumenta la variazione nel gradiente di colore tra i CAP ad alto reddito e consente una migliore visualizzazione della distribuzione del reddito medio nello stato.

Questo esercizio fa parte del corso

Mappe interattive con leaflet in R

Visualizza corso

Istruzioni dell'esercizio

  • Crea una versione logaritmica della palette di colori nc_pal.
  • Applica la palette logaritmica alla mappa leaflet.
  • Commenta il map tile nella mappa leaflet per visualizzare più facilmente la variazione del reddito medio (aggiungi # senza spazio prima della funzione che aggiunge il map tile).

esercizio interattivo pratico

Prova questo esercizio completando questo codice di esempio.

# Use the log function to create a new version of nc_pal
nc_pal <- colorNumeric("YlGn", domain = ___(high_inc@data$mean_income))

# comment out the map tile
high_inc %>%
  leaflet() %>%
  ___addProviderTiles("CartoDB") %>%
  # apply the new nc_pal to the map
  addPolygons(weight = 1, color = ~nc_pal(___(mean_income)), fillOpacity = 1,
              label = ~paste0("Mean Income: ", dollar(mean_income)),
              highlightOptions = highlightOptions(weight = 5, color = "white", bringToFront = TRUE))
Modifica ed esegui il codice