R htmlwidgets с помощью opens.js - программирование

Как я могу использовать большие htmlwidgets (например http://rstudio.github.io/leaflet/) с помощью opens.js и Rmarkdown?

Этот mwe (not discover.js) работает:

---
title: "Maptest 1"
output: html_document
---

##  Map

```{r, echo=FALSE}
library(leaflet)
m <- leaflet()
m <- addTiles(m)
m <- addMarkers(m, lng=174.768, lat=-36.852, popup="The birthplace of R")
m
```

Но этого нет:

---
title: "Maptest 2"
output: revealjs::revealjs_presentation
---

##  Map

```{r, echo=FALSE}
library(leaflet)
m <- leaflet()
m <- addTiles(m)
m <- addMarkers(m, lng=174.768, lat=-36.852, popup="The birthplace of R")
m
```

Я повторно использовал этот пример на веб-странице htmlwidgets, а шаблон opens.js - https://github.com/jjallaire/revealjs

--- title : Titley Title Titler subtitle : subtitileir author : Author Authoria job : Jobby job, CJJ framework : revealjs # {io2012, html5slides, shower, dzslides, ...} highlighter : highlight.js # {highlight.js, prettify, highlight} hitheme : github # widgets : [] # {mathjax, quiz, bootstrap} mode : selfcontained # {standalone, draft} knit : slidify::knit2slides ext_widgets: {rCharts: "libraries/highcharts"} revealjs: theme: Simple --- ### Title-y Title Titler Tu-title space title \- Author Authorio ---

Ответ 1