Jak uwzględnić sprytnie w R Studio Presentations (Rpres)

Question

Jak dołączyć spiskowany wykres w pliku Rpres? Jeśli zrobisz to tak jak w zwykłym pliku RMD

Basic Plot 
======================================================== 
```{r, echo=FALSE} 
library(plotly) 
plot_ly(economics, x = date, y = unemploy/pop) 
``` 

Wynik wygląda następująco:

roztworze wymyśliłem, która wykorzystuje możliwości, że Markdown może zawierać HTML:

Basic Plot 
======================================================== 
```{r, results='hide', echo=FALSE} 
library(plotly) 
p = plot_ly(economics, x = date, y = unemploy/pop) 
htmlwidgets::saveWidget(as.widget(p), file = "demo.html") 
``` 
<iframe src="demo.html" style="position:absolute;height:100%;width:100%"></iframe> 

Ale mam nadzieję na bardziej eleganckie rozwiązanie, które nie będzie używać żadnych dodatkowych plików.

Answer 1

Poniżej znajduje się minimalny przykład, jak dołączyć wykres plot_ly do prezentacji ioslides, więc nie odpowiada on na pytanie Rpres, ale zapewnia alternatywę.

Pierwszy slajd wyświetla wykres przekształcony z ggplota na działka_pl, zachowując styl ggplot. Drugi slajd wyświetla wykres bezpośrednio na działce.

--- 
title: "Plot_ly demo" 
date: "8 December 2016" 
output: ioslides_presentation 
--- 

```{r setup, include=FALSE} 
knitr::opts_chunk$set(echo = FALSE) 
``` 

## A simple plot_ly 

```{r, fig.align='center', message = FALSE} 
library(plotly) 

df <- data.frame(x = 1:10, y = (1:10)^2) 

p <- ggplot(df, aes(x = x, y = y)) + geom_line() + labs(x = "X", y = "Y", title = "X and Y") 

ggplotly(p) 
``` 

## Another simple plot_ly 

```{r, echo = FALSE, fig.align = 'center', message = FALSE} 
plot_ly(df, x = x, y = y) 
```