Tạo bản đồ leaflet đầu tiên của bạn
Bạn đã thấy cách tạo bản đồ leaflet như một tập hợp nhiều lớp khác nhau.
Cũng có các thiết lập khác cho phép người dùng chọn các lớp và nhà cung cấp bản đồ cụ thể.
Trong bài tập này, bạn sẽ tạo bản đồ leaflet của riêng mình với nhiều tính năng.
Có bốn đối tượng sf được lưu ở đây là:
london_polylondon_looplondon_capitallistings_geo
Bạn có thể xem thuộc tính hình học của mỗi đối tượng sf bằng ký hiệu $geometry.
Các thư viện sf, tidyverse và leaflet đã được nạp.
Bài tập này là một phần của khóa học
Xây dựng Dashboard với shinydashboard
Hướng dẫn bài tập
- Thêm một nhà cung cấp khác tên
Esri.WorldStreetMap. - Thêm các polygon màu đỏ.
- Điền
addLayersControl()để người dùng có thể chọn các overlay group và lớp khác nhau, thêm chúng theo đúng thứ tự xuất hiện.
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.
leaflet(london_poly) %>%
addTiles(group="Default") %>%
addProviderTiles(providers$Stamen.Toner, group = "Toner") %>%
# Add another provider called Esri.WorldStreetMap
___(___, group = "World street map") %>%
# Add red polygons
___(group = "Ward", col=___, label=~as.character(Name)) %>%
addPolylines(loop_geo[,1], loop_geo[,2], group = "London loop") %>%
addPolylines(capital_geo[,1], capital_geo[,2],
group = "Capital ring", color = "orange") %>%
addMarkers(data = listings_geo,
group = "Listings", clusterOptions = markerClusterOptions()) %>%
# Set up to allow user selection of different overlay groups and layers
___