# NOT RUN {
# Generating a 'circle' graph as a non-decomposable graph
adj <- graph.sim( p = 5, graph = "circle" )
adj # adjacency of graph with 5 nodes
sample <- rgcwish( n = 3, adj = adj, b = 3, D = diag( 5 ) )
round( sample, 2 )
# }
Run the code above in your browser using DataLab