r - R 中传单 map 上的 3D 条形图可视化

Question

我正在使用 R 和 Leaflet(在一个 Shiny 的应用程序中)。
我有我想通过 map 上的 3D 图可视化的点数据 - 像这样:https://slipiste.wordpress.com/2015/09/29/3d-bar-plot-on-a-map-in-r/
如果没有在传单上完成，可以理解如何做到这一点。但是如何在传单 map 上绘制它呢？有没有办法做到这一点？

他们的方式我认为它必须在我的传单 map 上覆盖一个 shapefile(透明)并在该 shapefile 上绘制 3D 条形图。然而，这似乎是一个凌乱的解决方法。但是，我没有找到有关该主题的任何网站。任何提示？

Answer 1

几年上 library(mapdeck)允许您在 map 上绘制 3D 条形图

library(mapdeck)

set_token("MAPBOX_TOKEN") ## you'll need an API token

df <- read.csv(paste0(
  'https://raw.githubusercontent.com/uber-common/deck.gl-data/master/',
  'examples/3d-heatmap/heatmap-data.csv'
))

mapdeck(
  style = mapdeck_style('dark')
  , pitch = 45 
  ) %>%
  add_grid(
    data = df[1:30000, ]
    , lat = "lat"
    , lon = "lng"
    , cell_size = 1000
    , elevation_scale = 50
    , layer_id = "grid_layer"
  )

从 v0.2.1006 开始，您可以使用 add_column()功能