## Not run: ------------------------------------
# adj.g <- toeplitz( c( 0, 1, rep( 0, 3 ) ) )
# adj.g # adjacency of graph with 5 nodes and 4 links
#
# sample <- rgcwish( n = 3, adj.g = adj.g, b = 3, D = diag(5) )
# round( sample, 2 )
## ---------------------------------------------
Run the code above in your browser using DataLab