ПочатиПочніть безкоштовно

Створення палітри кольорів за допомогою colorFactor

Поки що ми використовували колір лише для стилізації нашої мапи. За допомогою colorFactor() можна створити палітру, яка відображає кольори рівням факторної змінної.

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

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

Чому нам може не підійти саме ця палітра кольорів?

Якщо вам цікаво зафарбовувати мапу за неперервною змінною, дивіться colorNumeric(). 

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

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

Ця вправа є частиною курсу

Інтерактивні карти з leaflet у R

Переглянути курс

Інструкції до вправи

  • Створіть палітру кольорів pal для значень sector_label за допомогою colorFactor() з використанням "red", blue", і "#9b4a11".
  • Додайте круглі маркери, які зафарбовують коледжі за допомогою pal() і значень sector_label.

Інтерактивна практична вправа

Спробуйте виконати цю вправу, доповнивши цей зразок коду.

# 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
Редагувати та запускати код