# NOT RUN {
set.seed(1)
tree1 <- rtree(20, rooted=FALSE)
sp <- as.splits(rNNI(tree1, n=10))
net <- as.networx(sp)
plot(net)
# }
# NOT RUN {
# also see example in consensusNet
example(consensusNet)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab