Leaflet R 地图的搜索按钮？

我在 R 中使用 leaflet 库，它是 leaflet.js 库的包装器。我想知道是否可以使用 R 界面（或对底层代码进行一些修改）添加查询或搜索按钮？这里有 javascript 库的搜索插件http://leafletjs.com/plugins.html#search--popups，但我不知道如何让它们使用 R 库中的 javascript。

作为一个最小的示例，我想添加在下面的地图中搜索“位置 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
  )

使用 leafletplugins 包添加搜索栏的完整工作示例如下：

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')