姫路城の状況調査（仮）

MAPのプロット

姫路城はどこにあるのでしょうか？

library(leaflet)
m <- leaflet() %>%
  addTiles() %>%  # Add default OpenStreetMap map tiles
  addMarkers(lng=134.693905, lat=34.839414,, popup="姫路城")
m  # Print the map

codeの設定

ドキュメントの一番右上にCodeがで出てきています。 これはドキュメントにあるコードを全て表示/非表示設定することを可能にします。

タブセクションの設定

タブセクションを設定することにより各地の比較がやりやすくなります。

周辺の景況感

全体

比較してみましょう。
右タブで神戸と姫路の色に注目してみて下さい。

神戸

how do you think?

p +theme_bw(base_family="HiraKakuProN-W3") 

姫路

how do you think?

p