web-dev-qa-db-ja.com

リーフレット出力をHTMLとして保存する

RStudioを使用して、いくつかのリーフレット画像を作成しています。

出力をHTMLとして保存して、電子メールで送信したり他の人が表示できるようにしたいと思います。

以下は、サンプルリーフレットイメージを作成するために[ここ]から取得したサンプルRコードです。

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

HTMLとして出力できるコードは大歓迎です...

32
h.l.m

何かのようなもの:

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

ほとんどのウィジェットで動作するようです。

よろしく、
Einar

55
einar

新しいRMarkdownドキュメントを開きます。 RStudioを使用している場合は、File -> New File -> R Markdown。ファイルを保存したら、次のようにコードをチャンクに挿入できます。

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

次に、Knit HTMLコードウィンドウの上にあるボタンと、アプリケーションが新しいHTMLファイルで開きます。ファイルを電子メールで送信するか、ftpにアップロードできます。

9
maRtin

私は同じ問題に直面しており、Githubバージョンをインストールした後、問題は修正されました。

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

現在のバージョンは1.1.0.9000で、macOS Sierra、RStudioバージョン1.1.232およびR 3.4.0で実行されています

Htmlwidgetsを使用してRStudioまたはsaveからエクスポートできます。

3
RgrNormand

mapviewライブラリを使用する別のオプションは次のとおりです。

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

出力を.png.pdf、または.jpegに設定することもできます。

2
trevi

ライブラリ(mapview)

「png」または「jpg」画像として保存するには:

mapshot(m, file = "m.png")
mapshot(m, file = "m.jpeg")

Pdfでも使用できます

0
Pablo Naret