addPolygon() 옵션
지금까지는 addPolygons()의 기본 스타일만 사용했어요. 폴리곤은 여러 가지 방식으로 더 꾸밀 수 있습니다.
이번에 집중할 addPolygons()의 주요 인자는 다음과 같습니다:
- weight: 경계선 두께(픽셀 단위)
- color: 폴리곤 색상
- label: 마우스를 올렸을 때 보여줄 정보
- highlightOptions: 마우스를 올렸을 때 폴리곤을 강조하는 옵션
addPolygons(weight = 2,
color = "red",
label = ~paste0("Total Income: ", dollar(income)),
highlight = highlightOptions(weight = 10,
color = "blue",
bringToFront = TRUE))
이전 연습 문제에서 만들었던 high_inc SpatialPolygonsDataFrame은 이미 로드되어 있습니다.
이 연습은 강의의 일부입니다
R로 만드는 leaflet 인터랙티브 지도
연습 안내
addPolygons()의 인자를 사용해 NC의 고소득 우편번호 영역을 다음과 같이 매핑하세요:- 경계선 두께는 1픽셀,
- 폴리곤 색상은
nc_pal팔레트를 사용하고, 마우스를 올리면 강조되도록 하며, - 레이블은 "Mean Income:" 문구 뒤에 해당 우편번호의 평균 소득을 표시하도록 합니다.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# 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))