наложение ggmap на второй прозрачный фон google map - PullRequest
Новая
       26

наложение ggmap на второй прозрачный фон google map

0 голосов
/ 28 февраля 2019

Я пытаюсь безуспешно наложить на вторую карту Google только дороги, используя inset_ggmap 

m <- ggmap(dt_map_b) +
  geom_polygon(data = map_data, 
               aes(fill = outcomes,
                   x = long, 
                   y = lat.x, 
                   group = group),
               alpha = 0.5) +
  inset_ggmap(dt_map_r)

Все работает нормально, но когда я отключил видимость объектов местности, я обнаружил, что это всеназад под удушением моего исходного изображения

black background like spilled ink

Я знаю, что можно изменить цвет фона карт с помощью API Google но возможно ли изменить цвет фона у ggmap?Может быть, изменив то, что добавляется в URL?

1 Ответ

0 голосов
/ 12 июля 2019 
  m <- leaflet(outcomes_map) %>%

  addMapPane("base_map", zIndex = 410) %>%    # Level 1: base
  addMapPane("polygons", zIndex = 420) %>%    # Level 2: polygons
  addMapPane("waters", zIndex = 430) %>%      # Level 3: waters
  addMapPane("roads", zIndex = 440) %>%       # Level 4: roads
  addMapPane("labels", zIndex = 450) %>%      # Level 5: labels

    # adds in the base map

    addTiles(urlTemplate = base_map,
             options = pathOptions(pane = "base_map")) %>%

    # adds in the polygons containing the loaded data

    addPolygons(color = ~pal5(rank),
                weight = 1,
                fillOpacity  = 1,
                options = pathOptions(pane = "polygons")) %>%

    # adds in the other layers for aesthetics like roads, water, and place labels

    addTiles(urlTemplate = water_map,
             options = pathOptions(pane = "waters")) %>%

    addTiles(urlTemplate = road_map,
             options = pathOptions(pane = "roads",
                                   opacity = 0.75)) %>%

    addTiles(urlTemplate = label_map,
             options = pathOptions(pane = "labels")) %>%

      setView(lng = -80.843297, lat = 35.225256, zoom = 11)

        # you can export as either an interactive map or a static image

        mapshot(m, url = file.path(graph_export_path,"alrighty.html"))

        mapshot(m, file = file.path(graph_export_path,"alrighty.png"))

Оказывается, это гораздо проще сделать, просто используя листовки и карты ().Все, что вам действительно нужно сделать, это создать пару разных слоев для интересующих вас функций, а затем создать панели, чтобы упорядочить их в нужном вам порядке.Вам нужно будет настроить учетную запись mapbox и вытянуть карты с помощью API, но это довольно просто в листовке для документации по R.И таким образом у вас будет намного больше настроек того, как выглядят ваши карты!

...