Легендарна мапа
Додавати інформацію до мапи за допомогою кольору — чудово, але це корисно лише тоді, коли ми пам'ятаємо, що означають ці кольори. За допомогою addLegend() можна додати легенду-нагадування.
Є кілька аргументів, якими можна налаштувати легенду під свої потреби: opacity, title і position. Щоб створити легенду для нашого прикладу з colorNumeric(), зробіть таке.
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")
Ця вправа є частиною курсу
Інтерактивні карти з leaflet у R
Інтерактивна практична вправа
Спробуйте виконати цю вправу, доповнивши цей зразок коду.
# Add a legend that displays the colors used in pal
m %>%
___(pal = pal,
values = c("Public", "Private", "For-Profit"))