最初の leaflet マップを作成する
leaflet の地図は、複数のレイヤーを組み合わせて作成できることを見てきました。
また、特定のレイヤーや地図プロバイダをユーザーが選べるようにする設定もあります。
この演習では、さまざまな機能を持つ独自の leaflet マップを作成します。
ここには 4 つの sf オブジェクトが次のように保存されています。
london_polylondon_looplondon_capitallistings_geo
各 sf オブジェクトの geometry 属性は、$geometry 記法で確認できます。
sf、tidyverse、leaflet ライブラリは読み込まれています。
この演習はコースの一部です
shinydashboard で作るダッシュボード
演習の手順
Esri.WorldStreetMapというプロバイダをもう 1 つ追加します。- 赤いポリゴンを追加します。
addLayersControl()を設定し、ユーザーが異なるオーバーレイグループとレイヤーを選択できるようにします。表示順に沿って追加してください。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
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
___