在Slidify或R降价中运行Plotly图表

Question

我正在尝试使用plotly图表构建R Markdown演示文档，但它没有在浏览器中显示我们的图表。 代码如下：

========================================================

```{r,echo=false}
library(plotly)
p <- ggplot(data = diamonds, aes(x = cut, fill = clarity)) +
            geom_bar(position = "dodge")
ggplotly(p)
```