
Last chance! 50% off unlimited learning
Sale ends in
# NOT RUN {
g <- barabasi.game(100, m=1)
g2 <- barabasi.game(100, m=5)
edge_connectivity(g, 100, 1)
edge_connectivity(g2, 100, 1)
edge_disjoint_paths(g2, 100, 1)
g <- sample_gnp(50, 5/50)
g <- as.directed(g)
g <- induced_subgraph(g, subcomponent(g, 1))
adhesion(g)
# }
Run the code above in your browser using DataLab