Opções de addPolygon()
Até agora usamos a aparência padrão de addPolygons(). Há várias outras formas de personalizar os polígonos.
Os argumentos de addPolygons() em que vamos focar são:
- weight: a espessura das linhas de contorno, em pixels
- color: a cor dos polígonos
- label: a informação exibida ao passar o mouse
- highlightOptions: opções para destacar um polígono ao passar o mouse
addPolygons(weight = 2,
color = "red",
label = ~paste0("Total Income: ", dollar(income)),
highlight = highlightOptions(weight = 10,
color = "blue",
bringToFront = TRUE))
O SpatialPolygonsDataFrame high_inc que você criou no exercício anterior já foi carregado para você.
Este exercicio faz parte do curso
Mapas Interativos com leaflet em R
Instruções do exercicio
- Use os argumentos de
addPolygons()para mapear os CEPs de alta renda na Carolina do Norte com:- Espessura do contorno de 1 pixel,
- Polígonos coloridos com a paleta
nc_pale destacados ao passar o mouse, e - Rótulos que exibam as palavras "Mean Income:" seguidas da renda média do CEP.
exercicio interativo prático
Tente este exercicio completando este código de exemplo.
# create color palette with colorNumeric()
nc_pal <- colorNumeric("YlGn", domain = high_inc@data$mean_income)
high_inc %>%
leaflet() %>%
addTiles() %>%
# set boundary thickness to 1 and color polygons
addPolygons(___ = ___, ___ = ~nc_pal(mean_income),
# add labels that display mean income
label = ___("Mean Income: ", dollar(mean_income)),
# highlight polygons on hover
___ = highlightOptions(weight = 5, color = "white",
bringToFront = TRUE))