Kom igångKom igång gratis

Skapa en färgpalett med colorFactor

Hittills har vi bara använt färg för att anpassa stilen på vår karta. Med colorFactor() kan vi skapa en färgpalett som mappar färger till nivåerna i en faktorvariabel.

pal <- 
   colorFactor(palette = c("blue", "red", "green"), 
               levels = c("Public", "Private", "For-Profit"))

m %>% 
    addCircleMarkers(color = ~pal(sector_label))

Varför kanske vi inte vill använda just den här färgpaletten?

Om du är intresserad av att använda en kontinuerlig variabel för att färgsätta en karta, se colorNumeric().

pal <- colorNumeric(palette = "RdBu", domain = c(25:50))

ipeds %>% 
    leaflet() %>% 
        addProviderTiles("CartoDB")  %>% 
        addCircleMarkers(radius = 2, color = ~pal(lat))

Den här övningen är en del av kursen

Interaktiva kartor med leaflet i R

Visa kurs

Övningsinstruktioner

  • Skapa en färgpalett med namnet pal för värdena i sector_label med hjälp av colorFactor() och färgerna "red", "blue" och "#9b4a11".
  • Lägg till cirkelmarkörer som färgsätter lärosätena med pal() och värdena i sector_label.

Interaktiv övning med praktiskt arbete

Testa den här övningen genom att slutföra den här exempelkoden.

# Make a color palette called pal for the values of `sector_label` using `colorFactor()`  
# Colors should be: "red", "blue", and "#9b4a11" for "Public", "Private", and "For-Profit" colleges, respectively
pal <- ___(palette = c("red", "blue", ___), 
                   levels = c("Public", "Private", "For-Profit"))

# Add circle markers that color colleges using pal() and the values of sector_label
map2 <- 
    map %>% 
        addCircleMarkers(data = ca, radius = 2, 
                         color = ~pal(sector_label), 
                         label = ~paste0(name, " (", sector_label, ")"))

# Print map2
map2
Redigera och kör kod