a <- untb(1000,prob=0.005,gens=5000,keep=FALSE,start.mono=TRUE)
preston(a)
species.count(a)
species.abundance(a)
display.untb(n=100,prob=0.1,gens=1000)
data(butterflies)
species.curve(butterflies,show=TRUE)
Run the code above in your browser using DataCamp Workspace