web-dev-qa-db-fra.com

Enregistrement de la sortie du dépliant au format HTML

J'utilise RStudio pour créer des images de dépliant.

J'aimerais pouvoir enregistrer le résultat au format HTML afin de pouvoir l'envoyer par courrier électronique et le visualiser.

Vous trouverez ci-dessous un exemple de code R tiré de [ici] pour créer un exemple d'image de feuillet.

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

N'importe quel code permettant la sortie en HTML serait très apprécié ...

29
h.l.m

Quelque chose comme:

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

semble fonctionner sur la plupart des widgets.

Cordialement,
Einar

53
einar

Ouvrez un nouveau document RMarkdown. Lorsque vous utilisez RStudio, accédez à File -> New File -> R Markdown. Une fois le fichier sauvegardé, vous pouvez insérer votre code dans un bloc, comme ceci:

---
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
```

Appuyez ensuite sur le bouton Knit HTML au-dessus de la fenêtre de code et votre application s’ouvrira dans un nouveau fichier HTML. Vous pouvez envoyer le fichier par e-mail ou le télécharger sur votre FTP.

7
maRtin

J'ai rencontré le même problème et après l'installation de la version Github, le problème a été corrigé.

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

Ma version actuelle est la 1.1.0.9000, fonctionnant sous macOS Sierra, RStudio version 1.1.232 et R 3.4.0.

Vous pouvez exporter depuis RStudio ou sauvegarder en utilisant htmlwidgets.

3
RgrNormand

Une autre option utilisant la bibliothèque mapview est:

library(mapview) mapshot(m, url = "m.html")

Notez que vous pouvez également définir comme sortie un fichier .png, .pdf ou .jpeg

1
trevi