## The simple generator
g <- degree.sequence.game(rep(2,100))
degree(g)
is.simple(g) # sometimes TRUE, but can be FALSE
g2 <- degree.sequence.game(1:10, 10:1)
degree(g2, mode="out")
degree(g2, mode="in")
## The vl generator
g3 <- degree.sequence.game(rep(2,100), method="vl")
degree(g3)
is.simple(g3) # always TRUE
Run the code above in your browser using DataLab