keep only the largest component of graph
remove_small_components(g)
| g | An igraph object of the graph to embed. |
|---|
An igraph object.
As setse only works on connected components this function removes all but the largest component. This is a helper function to quickly project a network with setse.
library(igraph) set.seed(1284) #generate a random erdos renyi graph with 100 nodes and 150 edges g <- erdos.renyi.game(n=100, p.or.m = 150, type = "gnm" ) #count the number of components components(g)$no#> [1] 5#remove all but the largest component g2 <-remove_small_components(g) #Now there is only 1 component igraph::components(g2)$no#> [1] 1