rghype.RdGenerate random realisations from ghype model.
rghype(nsamples, model, m = NULL, multinomial = NULL, seed = NULL)scalar number of realisations
ghype model
optional scalar, number of edges to draw
optional boolean, draw from multinomial?
optional scalar, seed for random sampling.
list of adjacency matrices.
data('adj_karate')
model <- scm(adj_karate, FALSE, FALSE)
rghype(1, model)
#> [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13]
#> [1,] 0 3 3 1 1 1 0 2 2 0 0 1 1
#> [2,] 3 0 1 0 2 0 2 0 1 0 0 0 0
#> [3,] 3 1 0 1 1 3 0 0 0 0 1 0 0
#> [4,] 1 0 1 0 0 0 0 1 2 0 1 0 0
#> [5,] 1 2 1 0 0 0 0 1 0 1 0 1 0
#> [6,] 1 0 3 0 0 0 1 0 1 0 0 0 0
#> [7,] 0 2 0 0 0 1 0 0 1 0 0 0 0
#> [8,] 2 0 0 1 1 0 0 0 2 0 0 0 0
#> [9,] 2 1 0 2 0 1 1 2 0 0 0 0 0
#> [10,] 0 0 0 0 1 0 0 0 0 0 0 0 0
#> [11,] 0 0 1 1 0 0 0 0 0 0 0 0 0
#> [12,] 1 0 0 0 1 0 0 0 0 0 0 0 0
#> [13,] 1 0 0 0 0 0 0 0 0 0 0 0 0
#> [14,] 2 1 0 1 0 1 0 1 1 0 0 1 1
#> [15,] 1 0 0 0 0 1 0 1 1 0 1 0 0
#> [16,] 0 1 0 0 0 1 0 0 0 0 0 0 0
#> [17,] 0 0 0 0 0 0 1 0 1 0 0 0 0
#> [18,] 1 0 0 0 0 1 0 0 0 0 0 0 0
#> [19,] 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [20,] 0 0 0 0 0 0 0 0 0 0 0 0 0
#> [21,] 0 0 2 1 0 0 0 0 0 0 0 0 0
#> [22,] 1 0 1 0 0 0 0 0 0 0 0 0 0
#> [23,] 0 0 0 0 0 1 0 0 0 0 0 0 0
#> [24,] 2 1 1 0 2 0 1 0 0 0 2 0 0
#> [25,] 0 1 0 0 0 1 0 0 0 0 0 0 0
#> [26,] 3 0 1 1 0 1 0 1 0 0 0 1 0
#> [27,] 0 0 0 0 0 0 1 0 0 0 0 0 0
#> [28,] 1 3 0 3 0 1 0 1 1 0 0 0 0
#> [29,] 0 1 0 0 0 0 0 0 0 0 0 0 0
#> [30,] 0 0 1 2 0 1 0 0 1 0 0 0 1
#> [31,] 1 2 0 1 1 0 0 0 0 0 0 0 0
#> [32,] 5 2 3 1 0 1 2 1 0 0 0 0 0
#> [33,] 2 1 3 0 0 0 0 1 3 0 0 0 0
#> [34,] 7 6 2 5 0 1 2 2 3 0 0 0 0
#> [,14] [,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [,24] [,25]
#> [1,] 2 1 0 0 1 0 0 0 1 0 2 0
#> [2,] 1 0 1 0 0 0 0 0 0 0 1 1
#> [3,] 0 0 0 0 0 0 0 2 1 0 1 0
#> [4,] 1 0 0 0 0 0 0 1 0 0 0 0
#> [5,] 0 0 0 0 0 0 0 0 0 0 2 0
#> [6,] 1 1 1 0 1 0 0 0 0 1 0 1
#> [7,] 0 0 0 1 0 0 0 0 0 0 1 0
#> [8,] 1 1 0 0 0 0 0 0 0 0 0 0
#> [9,] 1 1 0 1 0 0 0 0 0 0 0 0
#> [10,] 0 0 0 0 0 0 0 0 0 0 0 0
#> [11,] 0 1 0 0 0 0 0 0 0 0 2 0
#> [12,] 1 0 0 0 0 0 0 0 0 0 0 0
#> [13,] 1 0 0 0 0 0 0 0 0 0 0 0
#> [14,] 0 0 0 1 1 0 0 0 1 0 2 0
#> [15,] 0 0 1 0 0 1 0 1 0 0 0 0
#> [16,] 0 1 0 0 0 0 0 0 0 0 0 0
#> [17,] 1 0 0 0 0 0 0 0 1 0 1 0
#> [18,] 1 0 0 0 0 0 0 0 0 0 0 1
#> [19,] 0 1 0 0 0 0 0 0 0 0 0 0
#> [20,] 0 0 0 0 0 0 0 0 0 0 0 0
#> [21,] 0 1 0 0 0 0 0 0 0 0 0 0
#> [22,] 1 0 0 1 0 0 0 0 0 0 1 0
#> [23,] 0 0 0 0 0 0 0 0 0 0 1 0
#> [24,] 2 0 0 1 0 0 0 0 1 1 0 0
#> [25,] 0 0 0 0 1 0 0 0 0 0 0 0
#> [26,] 0 0 1 0 1 0 1 0 0 0 0 2
#> [27,] 0 0 0 0 0 0 0 0 0 0 0 0
#> [28,] 0 0 0 0 0 0 0 0 0 0 3 0
#> [29,] 0 0 2 1 0 0 0 0 0 0 1 0
#> [30,] 2 0 1 1 0 0 0 0 0 0 0 0
#> [31,] 0 0 0 0 0 0 1 0 0 0 0 0
#> [32,] 1 0 0 0 0 0 0 0 0 0 0 0
#> [33,] 3 0 0 1 0 0 0 0 3 0 0 1
#> [34,] 2 0 1 0 0 0 2 0 1 1 5 0
#> [,26] [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34]
#> [1,] 3 0 1 0 0 1 5 2 7
#> [2,] 0 0 3 1 0 2 2 1 6
#> [3,] 1 0 0 0 1 0 3 3 2
#> [4,] 1 0 3 0 2 1 1 0 5
#> [5,] 0 0 0 0 0 1 0 0 0
#> [6,] 1 0 1 0 1 0 1 0 1
#> [7,] 0 1 0 0 0 0 2 0 2
#> [8,] 1 0 1 0 0 0 1 1 2
#> [9,] 0 0 1 0 1 0 0 3 3
#> [10,] 0 0 0 0 0 0 0 0 0
#> [11,] 0 0 0 0 0 0 0 0 0
#> [12,] 1 0 0 0 0 0 0 0 0
#> [13,] 0 0 0 0 1 0 0 0 0
#> [14,] 0 0 0 0 2 0 1 3 2
#> [15,] 0 0 0 0 0 0 0 0 0
#> [16,] 1 0 0 2 1 0 0 0 1
#> [17,] 0 0 0 1 1 0 0 1 0
#> [18,] 1 0 0 0 0 0 0 0 0
#> [19,] 0 0 0 0 0 0 0 0 0
#> [20,] 1 0 0 0 0 1 0 0 2
#> [21,] 0 0 0 0 0 0 0 0 0
#> [22,] 0 0 0 0 0 0 0 3 1
#> [23,] 0 0 0 0 0 0 0 0 1
#> [24,] 0 0 3 1 0 0 0 0 5
#> [25,] 2 0 0 0 0 0 0 1 0
#> [26,] 0 0 2 0 0 1 0 2 0
#> [27,] 0 0 0 0 1 0 0 0 0
#> [28,] 2 0 0 1 0 2 0 0 1
#> [29,] 0 0 1 0 0 0 0 0 1
#> [30,] 0 1 0 0 0 0 0 0 0
#> [31,] 1 0 2 0 0 0 1 1 0
#> [32,] 0 0 0 0 0 1 0 3 0
#> [33,] 2 0 0 0 0 1 3 0 4
#> [34,] 0 0 1 1 0 0 0 4 0