Mulai sekarangMulai gratis

Peta Legendaris

Menambahkan informasi ke peta menggunakan warna itu bagus, tetapi hanya berguna jika kita ingat apa yang diwakili tiap warna. Dengan addLegend() kita dapat menambahkan legenda sebagai pengingat.

Ada beberapa argumen yang dapat kita gunakan untuk menyesuaikan legenda sesuai kebutuhan, termasuk opacity, title, dan position. Untuk membuat legenda pada contoh colorNumeric(), kita akan melakukan hal berikut.

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

ipeds %>% 
    leaflet() %>% 
        addProviderTiles("CartoDB")  %>% 
        addCircleMarkers(radius = 2,
                         color = ~pal(lat)) %>% 
         addLegend(pal = pal,
                   values = c(25:50),
                   opacity = 0.75,
                   title = "Latitude",
                   position = "topleft")

Latihan ini merupakan bagian dari kursus

Peta Interaktif dengan leaflet di R

Lihat Kursus

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

# Add a legend that displays the colors used in pal
m %>% 
    ___(pal = pal, 
              values = c("Public", "Private", "For-Profit"))
Edit dan Jalankan Kode