# NOT RUN {
pf <- matrix( c(1, 0, 0, 1), nr=2)
g <- sample_pref(20, 2, pref.matrix=pf)
# }
# NOT RUN {
tkplot(g, layout=layout_with_fr)
# }
# NOT RUN {
pf <- matrix( c(0, 1, 0, 0), nr=2)
g <- sample_asym_pref(20, 2, pref.matrix=pf)
# }
# NOT RUN {
tkplot(g, layout=layout_in_circle)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab