Začněte nyníZačněte zdarma

Vytvoření barevné palety pomocí colorFactor

Zatím jsme barvu používali jen ke stylování mapy. Pomocí colorFactor() můžeme vytvořit barevnou paletu, která přiřadí barvy jednotlivým úrovním faktorové proměnné.

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

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

Proč by tato konkrétní barevná paleta nemusela být ideální volbou?

Pokud tě zajímá obarvení mapy podle spojité proměnné, podívej se na colorNumeric().

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

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

Toto cvičení je součástí kurzu

Interaktivní mapy s leaflet v R

Zobrazit kurz

Pokyny k cvičení

  • Vytvoř barevnou paletu pal pro hodnoty proměnné sector_label pomocí colorFactor() s použitím barev "red", "blue" a "#9b4a11".
  • Přidej kruhové značky, které obarví vysoké školy pomocí pal() a hodnot proměnné sector_label.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

# 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
Upravit a spustit kód