Recursively join a list of tidygraphs

Joins the graphs into a single graph. This recursively implementes tidygraph::graph_join()

recursive_graph_join(grs, by = "name")

Arguments

grs	a list of tidygraph objects
by	what to group by (passed to tidygraph::graph_join())

Value

a single tidygraph object

Examples

set.seed(0)

gr_list <- purrr::map(c(10, 15, 20), quick_forestfire)
gr <- recursive_graph_join(gr_list)
gr
#> # A tbl_graph: 20 nodes and 128 edges
#> #
#> # A directed acyclic multigraph with 1 component
#> #
#> # Node Data: 20 x 1 (active)
#>   name 
#>   <chr>
#> 1 A    
#> 2 B    
#> 3 C    
#> 4 D    
#> 5 E    
#> 6 F    
#> # … with 14 more rows
#> #
#> # Edge Data: 128 x 2
#>    from    to
#>   <int> <int>
#> 1     1     2
#> 2     1     3
#> 3     2     3
#> # … with 125 more rows

plot(gr)