# NOT RUN {
x <- matrix(runif(100),ncol=2)
g <- rng(x)
# }
# NOT RUN {
plot(g)
# }
# NOT RUN {
## Example using 'open':
g <- graph.full(5,directed=FALSE)
g1 <- rng(x=get.adjacency(g,sparse=FALSE),open=TRUE)
ecount(g1)
g2 <- rng(x=get.adjacency(g,sparse=FALSE),open=FALSE)
graph.isomorphic(g2,g)
# }
Run the code above in your browser using DataLab