inst/examples/deckgl-api-reference/heatmap-layer.R

In crazycapivara/deckgl: An R Interface to 'deck.gl'

## @knitr heatmap-layer
data("sf_bike_parking")

map <- deckgl() %>%
  add_heatmap_layer(
    data = sf_bike_parking,
    getPosition = ~lng + lat,
    getWeight = ~spaces
  ) %>%
  add_basemap()

if (interactive()) map