Membuat Palet Warna menggunakan colorFactor
Sejauh ini kita hanya menggunakan warna untuk menyesuaikan gaya peta. Dengan colorFactor() kita dapat membuat palet warna yang memetakan warna ke level-level dari variabel faktor.
pal <-
colorFactor(palette = c("blue", "red", "green"),
levels = c("Public", "Private", "For-Profit"))
m %>%
addCircleMarkers(color = ~pal(sector_label))
Mengapa kita mungkin tidak ingin menggunakan palet warna tertentu ini?
Jika Anda tertarik menggunakan variabel kontinu untuk memberi warna pada peta, lihat colorNumeric().
pal <- colorNumeric(palette = "RdBu", domain = c(25:50))
ipeds %>%
leaflet() %>%
addProviderTiles("CartoDB") %>%
addCircleMarkers(radius = 2, color = ~pal(lat))
Latihan ini merupakan bagian dari kursus
Peta Interaktif dengan leaflet di R
Instruksi latihan
- Buat palet warna bernama
paluntuk nilaisector_labelmenggunakancolorFactor()dengan "red", "blue", dan "#9b4a11". - Tambahkan penanda lingkaran yang mewarnai perguruan tinggi menggunakan
pal()dan nilaisector_label.
Latihan interaktif langsung praktik
Cobalah latihan ini dengan melengkapi kode contoh ini.
# 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