powered by
phyloshuffle(tree)
data(bird.orders) par(mfrow = c(1,2)) plot(bird.orders) rand <- phyloshuffle(bird.orders) plot(rand)
Run the code above in your browser using DataLab