Legendarna mapa
Kolorowanie elementów mapy to świetny sposób na przekazywanie informacji – ale tylko wtedy, gdy pamiętamy, co poszczególne kolory oznaczają. Funkcja addLegend() pozwala dodać legendę, która o tym przypomni.
Do dostosowania legendy możesz użyć kilku argumentów, m.in. opacity, title oraz position. Aby dodać legendę do naszego przykładu z colorNumeric(), użyj poniższego kodu.
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")
To ćwiczenie jest częścią kursu
Interaktywne mapy z leaflet w R
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
# Add a legend that displays the colors used in pal
m %>%
___(pal = pal,
values = c("Public", "Private", "For-Profit"))