Find all graphs which result from removing one admixture edge

graph_minusone(graph, ntry = Inf)

Arguments

graph

Admixture graph in igraph format

Value

A data frame with columns from, to, and graph

Examples

if (FALSE) {
newgraphs = graph_minusone(example_igraph)
# now evaluate the new graphs
newgraphs %>%
  rowwise %>%
  mutate(res = list(qpgraph(example_f2_blocks, graph))) %>%
  unnest_wider(res)
}