2016-06-13 10 views
0

私は、リーフレットライブラリをRの中で使用しています。これは、leaflet.jsライブラリへのラッパーです。私はそれがRのインターフェイス(またはいくつかの基本的なコードにハック)を使用してクエリや検索ボタンを追加することは可能ですか?ここにはjavascriptライブラリの検索プラグインがありますが、Rライブラリから出てくるjavascriptをどのように動作させるかを理解することはできません。リーフレットRの検索ボタンは?

最小限の例として、私は、次のマップに「場所1」を検索し、それがポップアップを表示するには、次の持っている能力に追加する:

library(leaflet) 
df = read.csv(textConnection(
    'Name, Lat, Long 
    <b>location 1</b>,42.3401, -71.0589 
    <b>location 2</b>,42.3501, -71.0689')) 

leaflet(df) %>% 
    addTiles() %>% 
    setView(lng=-71.0589,lat=42.3301, zoom=12) %>% 
    addMarkers(~Long, ~Lat, popup = ~Name 
) 

答えて

1

あることが表示されますRリーフレットパッケージの検索プラグイン:leafletpluginsパッケージを使用して検索バーを追加するhttps://github.com/byzheng/leafletplugins

+0

このソリューション働きました。しかし、リーフレットコードを動作させるには、 'devtools :: install_github( 'byzheng/leaflet')' – Devon

2

完全な実施例はここにある:

devtools::install_github('byzheng/leaflet') 
library(leaflet) 
library(leafletplugins) 

df = read.csv(textConnection(
    'Name, Lat, Long, Name2 
    <b>location 1</b>,42.3401, -71.0589, Loc 1 
    <b>location 2</b>,42.3501, -71.0689, Loc 2')) 

leaflet(df) %>% 
    addTiles() %>% 
    setView(lng=-71.0589,lat=42.3301, zoom=12) %>% 
    addMarkers(~Long, ~Lat, popup = ~Name, group = 'marker', label = ~Name2) %>% 
    addSearchMarker('marker', position='topleft', propertyName = 'label') 
+1

を使用して最新のバージョンのリーフレット(CRANではなく)をforkする必要があります.extrasパッケージ。 – needRhelp

関連する問題