In JohnCoene/echarts4r: Create Interactive Graphs with 'Echarts JavaScript' Version 5

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

library(echarts4r)

e_common(
    font_family = "Raleway"
)

Leaflet only works with e_scatter and e_effect_scatter.

Scatter

url <- "https://echarts.apache.org/examples/data-gl/asset/data/population.json"
data <- jsonlite::fromJSON(url)
data <- as.data.frame(data)
names(data) <- c("lon", "lat", "value")
data$value <- log(data$value)

data |> 
  e_charts(lon) |> 
  e_leaflet() |>
  e_leaflet_tile() |>  
  e_scatter(lat, size = value, coord_system = "leaflet")

Mapbox

You will need mapbox token.

data |> 
  e_charts(lon) |> 
  e_mapbox(
    token = "YOUR_TOKEN",
    style = "mapbox://styles/mapbox/dark-v9"
  ) |> 
  e_bar_3d(lat, value, coord_system = "mapbox") |> 
  e_visual_map(value)

data |> 
  e_charts(lon) |> 
  e_mapbox(
    token = "pk.eyJ1IjoiamNvZW5lcCIsImEiOiJjamwyYXJyMjExb2R0M3FxcDlmemg2czFiIn0.OL6qEEADz5qBjhKecwgBdg",
    style = "mapbox://styles/mapbox/dark-v9"
  ) |> 
  e_bar_3d(lat, value, coord_system = "mapbox") |> 
  e_visual_map(value)

JohnCoene/echarts4r documentation built on Feb. 23, 2024, 9:21 a.m.