Bản đồ cuối cùng
Vì bản đồ leaflet của chúng ta được xây dựng theo từng lớp (layer), bạn có thể thêm nhiều loại thông tin khác nhau lên cùng một bản đồ nền (ví dụ: điểm và đa giác). Khi thêm các lớp mới dựa trên dữ liệu khác vào một đối tượng leaflet hiện có, bạn phải chỉ định tham số data ngay trong hàm tạo lớp mới để ghi đè dữ liệu đang được truyền qua chuỗi các hàm.
m4 %>%
addCircleMarkers(data = private)
Hãy kết hợp bản đồ điểm và đa giác để thêm một lớp làm nổi bật các mã zip giàu nhất của Mỹ vào bản đồ mọi trường đại học ở Mỹ. Để bạn bắt đầu, phiên bản xếp lớp gần nhất của bản đồ trường đại học m4 đã được in sẵn và wealthy_zips (SpatialPolygonsDataFrame) đã được nạp trước.
Sau khi tạo xong bản đồ cuối cùng, hãy dành vài phút để khám phá (và tận hưởng) bản đồ leaflet của 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
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.
# Add polygons using wealthy_zips
final_map <- ___ %>%
addPolygons(data = ___, weight = 1, fillOpacity = .5, color = "Grey", group = "Wealthy Zip Codes",
label = ~paste0("Mean Income: ", dollar(mean_income)),
highlight = highlightOptions(weight = 5, color = "white", bringToFront = TRUE)) %>%
# Update layer controls including "Wealthy Zip Codes"
addLayersControl(baseGroups = c("OSM", "Carto", "Esri"),
overlayGroups = c("Public", "Private", "For-Profit", ___))