补上昨天代码！！！

这个模型得人口增长在一段时间给出的初始种群在承载能力下得增长速度，他的承载能力受到取决于环境因素，食物数量。

模型可表示为Subscript[y, t]=M/(1+(M/Subscript[y, 0]-1) exp(-r M t))。其中y表示人口大小，t是时间，M是承载能力，r是增长率。在所有条件的制约下，最终一个稳定的人口数量就会形成......

代码在此：

Manipulate[

Plot[M/(1 + (M/y0 - 1) Exp[-r M t]), {t, 0, 20},

PlotRange -> {-5, 15}, AxesLabel -> {t, y}, Axes -> True,

ImagePadding -> {{15, 15}, {15, 15}}, ImageSize -> {500, 320}],

{{y0, 0.1, "initial population \!\(\*SubscriptBox[\(y\), \(0\)]\)"},

0.001, 8, Appearance -> "Labeled"},

{{r, 0.15, "growth rate r"}, .01, 2, Appearance -> "Labeled"},

{{M, 4, "carrying capacity M"}, .01, 10, Appearance -> "Labeled"},

ControlPlacement -> Top]