使用rmarkdown在HTML文档中未呈现传单地图

Question

这是我的代码

---
date: "7 December 2018"
output: html_document
---

## 7 December 2018

```{r, echo=FALSE}
library(leaflet)
library(jsonlite)
citibike <- fromJSON("http://citibikenyc.com/stations/json")
stations <- citibike$stationBeanList
m = leaflet(stations) %>% addTiles(urlTemplate = 'http://{s}.tile.openstreetmap.org/{z}/{x}/{y}.png') %>% addCircles(lat = ~latitude, lng = ~longitude, weight = 5, radius = ~availableBikes, popup = paste("Station:", stations$stationName, "<br>", stations$availableBikes, "available bikes", "<br>", stations$availableDocks, "available docks")) %>% addControl("Available Bikes in NYC on 12/07/2018", position = "topright")
m
```

使用Knit，创建的html文档仅显示日期，而不显示地图。在RStudio控制台中使用该代码时，创建地图不会出现任何问题。

我已经从github下载了最新版本的传单。我使用Windows 10。

  

平台x86_64-w64-mingw32拱x86_64
  os mingw32系统x86_64，   mingw32飞行状态专业   3次5.1   年2018月07
  第02天SVN修订号74947
  语言R版本。字符串R版本   3.5.1（2018-07-02）绰号羽毛喷雾