Salvataggio dell'output di volantini come HTML

Question

Sto utilizzando RStudio per creare alcune immagini di volantini.

Mi piacerebbe essere in grado di salvare l'output come HTML in modo che possa essere inviato via email e altri possano visualizzarlo.

Di seguito è riportato un esempio di codice R che è stato preso da [qui] per creare un'immagine campione di volantini.

devtools::install_github('rstudio/leaflet') 
library(leaflet) 
rand_lng = function(n = 10) rnorm(n, -93.65, .01) 
rand_lat = function(n = 10) rnorm(n, 42.0285, .01) 
m = leaflet() %>% addTiles() %>% addCircles(rand_lng(50), rand_lat(50), radius = runif(50, 10, 200)) 
m 

alcun codice per essere in grado di uscita come HTML sarebbe molto apprezzato ...

Answer 1

Qualcosa di simile:

library(htmlwidgets) 
saveWidget(m, file="m.html") 

sembra funzionare sulla maggior parte dei widget.

saluti,
Einar

Answer 2

Aprire un nuovo documento RMarkdown. Quando si utilizza RStudio, andare a File -> New File -> R Markdown. Una volta salvato il file, è possibile inserire il codice in un pezzo, come questo:

--- 
title: "Leaflet Map" 
output: html_document 
--- 

```{r} 
library(leaflet) 
rand_lng = function(n = 10) rnorm(n, -93.65, .01) 
rand_lat = function(n = 10) rnorm(n, 42.0285, .01) 
m = leaflet() %>% addTiles() %>% addCircles(rand_lng(50), rand_lat(50), radius = runif(50, 10, 200)) 
m 
``` 

quindi premere il pulsante Knit HTML sopra la finestra di codice e l'applicazione viene aperto in un nuovo file HTML. Puoi inviare il file tramite eMail o caricarlo sul tuo ftp.

Answer 3

Ho affrontato lo stesso problema e dopo aver installato la versione Github il problema è stato risolto.

# Or Github version 
if (!require('devtools')) install.packages('devtools') 
devtools::install_github('rstudio/leaflet') 

La mia versione attuale è 1.1.0.9000, in esecuzione su MacOS Sierra, RStudio versione 1.1.232 e R 3.4.0

È possibile esportare da RStudio ou Salva con htmlwidgets.