# NOT RUN {
data(butterflies)
untb(start=butterflies, prob=0, gens=100)
a <- untb(start=1:10,prob=0.005, gens=1000,keep=TRUE)
plot(species.count(a),type="b")
matplot(species.table(a),type="l",lty=1)
# }
Run the code above in your browser using DataLab