Um mapa lendário
Adicionar informações ao nosso mapa usando cores é ótimo, mas isso só ajuda se lembrarmos o que cada cor representa. Com addLegend() podemos incluir uma legenda para nos lembrar disso.
Há vários argumentos que você pode usar para personalizar a legenda, como opacity, title e position. Para criar uma legenda para o nosso exemplo com colorNumeric(), faríamos o seguinte.
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")
Este exercicio faz parte do curso
Mapas Interativos com leaflet em R
exercicio interativo prático
Tente este exercicio completando este código de exemplo.
# Add a legend that displays the colors used in pal
m %>%
___(pal = pal,
values = c("Public", "Private", "For-Profit"))