PNG статической карты с использованием R и Mapdeck - PullRequest
0 голосов
/ 06 февраля 2019

Я хотел бы создать статическую карту, используя R и Mapdeck.Я делаю это в первый раз, и я просто хочу любой вывод карты png на этом этапе.(В конце концов я хочу создать карту США с 50 штатами и с расширенными горизонтальными гистограммами для некоторых городов.)

На сайте ниже я нашел пример кода.На данный момент я просто хочу простой png этого файла.Я создал токен mapdeck, я могу запустить этот код без ошибок, но я не получаю никакого вывода "viewer", который отображал бы карту, которую я экспортировал бы в 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 голосов
/ 07 февраля 2019

Существует несколько возможных проблем

  1. Известная проблема, когда вы не видите карту в программе просмотра RStudio

решение - открыть его в браузере, нажав кнопку «открыть в новом окне»

В данных NA s, и он фокусируется на (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

...