Post-exponential growth & chaos

Pop[k_][y_] := k y (1 - y);

ListPlot[NestList[Pop[1.01], 0.0001, 3000], PlotJoined->True];

Pop[4], 0.0001, 50]

http://library.wolfram.com/examples/iteration/iterate.nb

Pop[3], 0.0001, 50]

k = growth rate

y= population size

Previous slide

Next slide

Back to first slide

View graphic version