Add lines.

e_lines(e, source_lon, source_lat, target_lon, target_lat, source_name,
  target_name, value, coord_system = "geo", name = NULL, rm_x = TRUE,
  rm_y = TRUE, ...)

e_lines_(e, source_lon, source_lat, target_lon, target_lat,
  source_name = NULL, target_name = NULL, value = NULL,
  coord_system = "geo", name = NULL, rm_x = TRUE, rm_y = TRUE, ...)

Arguments

e

An echarts4r object as returned by e_charts.

source_lon, source_lat, target_lon, target_lat

coordinates.

source_name, target_name

Names of source and target.

value

Value of edges.

coord_system

Coordinate system to use, one of geo, or cartesian2d.

name

name of the serie.

rm_x, rm_y

Whether to remove x and y axis, defaults to TRUE.

...

Any other option to pass, check See Also section.

See also

Examples

flights <- read.csv( paste0("https://raw.githubusercontent.com/plotly/datasets/", "master/2011_february_aa_flight_paths.csv") ) flights %>% e_charts() %>% e_geo() %>% e_lines( start_lon, start_lat, end_lon, end_lat, airport1, airport2, cnt, name = "flights", lineStyle = list(normal = list(curveness = 0.3)) ) %>% e_tooltip(trigger="item", formatter = htmlwidgets::JS(" function(params){ return( params.seriesName +'<br />' + params.data.source_name + ' -> ' + params.data.target_name + ':'+ params.value ) } ") ) # timeline flights$grp <- rep(LETTERS[1:2], 89) flights %>% group_by(grp) %>% e_charts(timeline = TRUE) %>% e_geo() %>% e_lines( start_lon, start_lat, end_lon, end_lat, cnt, coord_system = "geo" )