使用R和Mapdeck的静态地图的PNG

时间:2019-02-06 18:35:35

标签: r png mapdeck

我想使用R和Mapdeck创建静态地图。我是第一次这样做,我只希望在此阶段仅输出任何png映射。 (最终,我想用50个州和一些城市的扩展水平条形图创建美国地图。)

在下面的网站上,我找到了示例代码。目前,我只需要此文件的简单png。我创建了mapdeck令牌,我可以毫无错误地运行此代码,但是我没有得到任何“查看器”输出来显示要导出为png的地图。 我在网络上发现了其他mapdeck / R代码,但没有一个显示任何视觉效果。

https://geocompr.robinlovelace.net/adv-map.html

library(mapdeck)
set_token(Sys.getenv("MAPBOX"))
df = read.csv("https://git.io/geocompr-mapdeck")
ms = mapdeck_style("dark")
mapdeck(style = ms, pitch = 45, location = c(0, 52), zoom     = 4) %>%
add_grid(data = df, lat = "lat", lon = "lng", cell_size = 1000,
     elevation_scale = 50, layer_id = "grid_layer",
     colour_range = viridisLite::plasma(5))

1 个答案:

答案 0 :(得分:0)

有两个可能的问题

  1. 一个看不到map in your RStudio viewer的已知问题

解决方案是按“在新窗口中打开”按钮在浏览器中打开

  1. 数据中有NA个,您的注意力集中在(0,0)

解决方案是删除NA,或者只是缩小

此外,自撰写该文章以来,该软件包已更新至v0.2.1,因此对代码进行了一些微妙的更改。

df = read.csv("https://git.io/geocompr-mapdeck")

library(mapdeck)

set_token("MAPBOX_TOKEN")
ms = mapdeck_style("dark")

df <- df[ !is.na(df$lat), ]

mapdeck(style = ms, pitch = 45) %>%
  add_grid(data = df, lat = "lat", lon = "lng", cell_size = 1000,
           elevation_scale = 50, layer_id = "grid_layer",
           colour_range = colourvalues::colour_values(1:6, palette = "plasma")))

enter image description here