Create 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)

Arguments

islands.n

The number of islands in the graph.

islands.size

The size of the islands in the graph.

islands.pin

The probability of intra-island edges.

n.inter

number of negative edges between two islands.

Value

a signed igraph graph

Author

David Schoch

Examples

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