在 R 中保存带有图标的传单输出地图答案

【问题标题】：Saving Leaflet output maps WITH ICONS in R在 R 中保存带有图标的传单输出地图
【发布时间】：2017-07-28 10:05:34
【问题描述】：

我正在尝试将简单的传单地图导出为 png、jpg 或任何可以保存、通过电子邮件发送等的格式，以及由 jpg 文件制作的图标。我根据 htmlwidgets 或 mapview 等建议尝试的每种方法都会给我一个文件，其中只有灰色背景上的图标（地图层消失了）。然后奇怪的事情发生了。即使我摆脱了自定义图标（来自我的 jpeg），现在我得到了带有蓝色默认图标的灰色背景，仍然没有地图。

我已经在How to save Leaflet in R map as png or jpg file? 尝试了所有解决方案，我充其量只是获得了图标层，但没有地图。

library(leaflet)

anna1Icon <- makeIcon(
  iconUrl = "pic.jpg",
  iconWidth = 2*31*215/230, iconHeight = 2*31,
  iconAnchorX = 2*31*215/230/2, iconAnchorY = 2*16
)

my_map <- leaflet() %>% 
  addTiles() %>%
  addMarkers(lat=44, lng=-93, popup="House", icon = anna1Icon)

解决方案尝试1：

library(mapview)
mapshot(my_map, file = 'file.png')

解决方案尝试 2：

library(htmlwidgets)
saveWidget(my_map, file="temp.html", selfcontained = FALSE)
webshot("temp.html", file = "output.png",
        cliprect = "viewport")

帮忙，谢谢！

【问题讨论】：

标签： javascript r leaflet

【解决方案1】：

添加语句： addProviderTiles(providers$OpenStreetMap)

library(leaflet)

anna1Icon <- makeIcon(
  iconUrl = "pic.jpg",
  iconWidth = 2*31*215/230, iconHeight = 2*31,
  iconAnchorX = 2*31*215/230/2, iconAnchorY = 2*16
)

my_map <- leaflet() %>% 
  addTiles() %>%
  addProviderTiles(providers$OpenStreetMap) %>%
  addMarkers(lat=44, lng=-93, popup="House", icon = anna1Icon)


library(htmlwidgets)
saveWidget(my_map, file="temp.html", selfcontained = TRUE)

这是另一个有同样问题的问题： saving R leaflet map as html: tiles not included

【讨论】：