R/random_graphs.R
sample_islands_signed.RdCreate a number of Erdos-Renyi random graphs with identical parameters, and connect them with the specified number of negative ties.
sample_islands_signed(islands.n, islands.size, islands.pin, n.inter)The number of islands in the graph.
The size of the islands in the graph.
The probability of intra-island edges.
number of negative edges between two islands.
a signed igraph graph
library(igraph)
sample_islands_signed(3, 10, 0.5, 1)
#> IGRAPH d9363c7 U--- 30 72 --
#> + attr: grp (v/c), sign (e/n)
#> + edges from d9363c7:
#> [1] 1-- 4 1-- 6 1-- 7 2-- 3 2-- 4 2-- 6 2--10 3-- 5 3-- 7 4-- 5
#> [11] 4--10 5-- 6 5-- 8 6-- 7 6-- 8 6--10 7--10 8-- 9 11--12 11--14
#> [21] 11--16 11--17 11--18 11--19 12--15 12--16 12--17 12--20 13--17 13--18
#> [31] 13--19 13--20 14--15 14--16 14--17 14--18 14--20 15--16 15--17 15--18
#> [41] 16--17 16--18 17--19 21--23 21--26 21--27 21--29 21--30 22--23 22--24
#> [51] 22--27 23--24 23--25 23--26 23--28 23--29 23--30 24--26 24--29 24--30
#> [61] 25--28 25--29 25--30 26--27 26--30 27--29 27--30 28--29 29--30 3--19
#> [71] 17--23 5--28