Flow GL

e_flow_gl(
  e,
  y,
  sx,
  sy,
  color,
  name = NULL,
  coord_system = NULL,
  rm_x = TRUE,
  rm_y = TRUE,
  ...
)

e_flow_gl_(
  e,
  y,
  sx,
  sy,
  color = NULL,
  name = NULL,
  coord_system = NULL,
  rm_x = TRUE,
  rm_y = TRUE,
  ...
)

Arguments

e

An echarts4r object as returned by e_charts or a proxy as returned by echarts4rProxy.

y

Vector position on the y axis.

sx, sy

Velocity in respective axis.

color

Vector color.

name

name of the serie.

coord_system

Coordinate system to use.

rm_x, rm_y

Whether to remove x and y axis, only applies if coord_system is not null.

...

Any other option to pass, check See Also section.

See also

Examples

# coordinates vectors <- expand.grid(0:9, 0:9) names(vectors) <- c("x", "y") vectors$sx <- rnorm(100) vectors$sy <- rnorm(100) vectors$color <- log10(runif(100, 1, 10)) vectors |> e_charts(x) |> e_flow_gl(y, sx, sy, color) |> e_visual_map( min = 0, max = 1, # log 10 dimension = 4, # x = 0, y = 1, sx = 3, sy = 4 show = FALSE, # hide inRange = list( color = c( "#313695", "#4575b4", "#74add1", "#abd9e9", "#e0f3f8", "#ffffbf", "#fee090", "#fdae61", "#f46d43", "#d73027", "#a50026" ) ) ) |> e_x_axis( splitLine = list(show = FALSE) ) |> e_y_axis( splitLine = list(show = FALSE) ) # map latlong <- seq(-180, 180, by = 5) wind <- expand.grid(lng = latlong, lat = latlong) wind$slng <- rnorm(nrow(wind), 0, 200) wind$slat <- rnorm(nrow(wind), 0, 200) wind$color <- abs(wind$slat) - abs(wind$slng) rng <- range(wind$color) trans <- list(opacity = 0.5) # transparency wind |> e_charts(lng, backgroundColor = "#333") |> e_geo() |> e_flow_gl( lat, slng, slat, color, itemStyle = trans, particleSize = 2 ) |> e_visual_map( color, # range dimension = 4, # lng = 0, lat = 1, slng = 2, slat = 3, color = 4 show = FALSE, # hide inRange = list( color = c( "#313695", "#4575b4", "#74add1", "#abd9e9", "#e0f3f8", "#ffffbf", "#fee090", "#fdae61", "#f46d43", "#d73027", "#a50026" ) ) ) |> e_x_axis(show = FALSE) |> e_y_axis(show = FALSE)