Tùy chọn của addPolygon()
Đến giờ bạn vẫn đang dùng giao diện mặc định cho addPolygons(). Có nhiều cách khác để tùy biến các polygon.
Các đối số của addPolygons() mà chúng ta sẽ tập trung gồm:
- weight: độ dày của đường viền tính theo pixel
- color: màu của các polygon
- label: thông tin hiển thị khi di chuột
- highlightOptions: các tùy chọn để làm nổi bật polygon khi di chuột
addPolygons(weight = 2,
color = "red",
label = ~paste0("Total Income: ", dollar(income)),
highlight = highlightOptions(weight = 10,
color = "blue",
bringToFront = TRUE))
Đối tượng high_inc kiểu SpatialPolygonsDataFrame mà bạn đã tạo ở bài trước đã được nạp sẵn cho bạn.
Bài tập này là một phần của khóa học
Bản đồ tương tác với leaflet trong R
Hướng dẫn bài tập
- Dùng các đối số của
addPolygons()để vẽ các mã zip có thu nhập cao ở NC với:- Độ dày đường viền 1 pixel,
- Polygon được tô màu bằng bảng màu
nc_palvà được làm nổi bật khi di chuột, và - Nhãn hiển thị cụm từ "Mean Income:" theo sau là thu nhập trung bình của mã zip.
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
# 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))