在mathematica求解弱肉强食（捕食者与被捕食者）问题

我尝试用NDSolve解捕食者与被捕食者微分方程

NDSolve[{z'[t] == z[t] - 0.01*z[t]*y[t], 
   y'[t] == -0.5 y[t] + 0.02*z[t]*y[t], z[0] == 25, y[0] == 2}, 
   {z, y}, {t, 0, 15}];

结果显示 NDSolve::dsvar: 0.` 不能用作变量.

常微分方程DSolve我试了，没有意义。弱肉强食问题，在matlab中的是用ode45龙格库塔方法，但是mathematica里没有这个用法。

所以我想通过NDSolve来解出一堆点来，再用LIstPlot画图z与y的关系，即捕食者与被捕食者关系图象

这个微分方程没有解析解啊，所以只建议用数值方法，比方说题主说的ode45