如何在tmap_leaflet()生成的代码中添加/注入任意Javascript?

时间:2018-02-05 16:00:32

标签: leaflet tmap r-leaflet

使用R' tmap套餐"查看"模式,这里我有一个生成交互式世界地图的R伪代码,并添加一个信息按钮,使用javascript显示警报。

# this is pseudocode - providing real data would be too much work
lf <- tmap_leaflet(tm_world) %>% 
        setView(2.2945, 0, zoom=2) %>% 
        addEasyButton(
            button = easyButton(
              icon = 'fa-warning',
              onClick = JS('function(btn, map){ alert("At very high zoom levels,\\nsite locations are approximate\\ndue to various issues."); }')
            )
          ) 
print(lf)

现在,当print.tmap()save_tmap()被调用时,它们会生成一个复杂的HTML页面,其中包含许多基于页面的javascript base64编码。

我希望在script<head>元素中包含一些最终为<footer>个标记的javascript片段(onLoad处理程序,AMD模块),与{{1}不同} onClick的处理程序。

如果在保存后手动编辑生成的文件怎么办呢?我想从R内做到这一点。

0 个答案:

没有答案