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 fe7ade1 U--- 30 77 --
#> + attr: grp (v/c), sign (e/n)
#> + edges from fe7ade1:
#> [1] 1-- 3 1-- 4 1-- 8 2-- 3 2-- 4 2-- 5 2-- 7 2-- 8 2-- 9 2--10
#> [11] 3-- 5 3-- 6 3-- 7 3-- 9 3--10 4-- 8 5-- 7 5-- 9 6-- 7 7-- 8
#> [21] 8-- 9 9--10 11--12 11--13 11--14 11--16 11--19 12--14 12--17 12--19
#> [31] 13--14 13--15 14--15 14--16 14--17 14--19 14--20 15--16 15--17 15--20
#> [41] 16--17 16--18 16--20 17--18 17--19 17--20 18--19 19--20 21--23 21--27
#> [51] 21--29 21--30 22--25 22--26 22--27 22--28 23--24 23--26 23--27 23--28
#> [61] 23--29 24--25 24--29 24--30 25--27 25--28 25--29 25--30 26--28 26--30
#> [71] 27--28 27--29 28--29 28--30 6--30 13--26 20--24