web-dev-qa-db-ja.com

R付きのリーフレット:テキストラベルを追加

このコードは このページ から取得されます:

library(leaflet)
leaflet(data = quakes[1:20,]) %>% addTiles() %>%
  addMarkers(~long, ~lat, popup = ~as.character(mag))

マーカーの代わりに、magをテキストラベルとしてプロットする方法はありますか?

10
luciano

[〜#〜]更新[〜#〜]

この回答が投稿されたとき、addLabelOnlyMarkers()はCRANバージョンに正式に含まれていなかったと思います。 2018年1月8日の時点で、リーフレットはCRANのバージョン1.1.0にあります。このバージョンには機能があります。 githubバージョンをダウンロードする必要はありません。

元の回答

leafletパッケージをGitHubからインストールしている場合は、次のことができます。

_leaflet(data = quakes[1:20,]) %>% addTiles() %>%
  addLabelOnlyMarkers(~long, ~lat, label =  ~as.character(mag), 
                      labelOptions = labelOptions(noHide = T, direction = 'top', textOnly = T))
_

enter image description here


addPopups関数は、GitHubのパッケージバージョンを使用したくない場合に役立つ回避策になる可能性があります。 (これは、CRANバージョンでのaddLabelOnlyMarkers()の公式リリース前のケースでした。)

_leaflet(data = quakes[1:20,]) %>% addTiles() %>%
        addPopups(~long, ~lat, ~as.character(mag), 
        options = popupOptions(minWidth = 20, closeOnClick = FALSE, closeButton = FALSE))
_
16
symbolrush
4
user507484