plotting results of rk



On Sex, 2009-03-27 at 08:54 +0300, Semyon Glazyrin wrote:
> $ load(dynamics);
> $ res:rk([x+y,x-y],[x,y],[1,0],[t,0,1,0.1]);
> 
> This returns me a list of [t,x,y]. How can I plot x(t) and y(t)?

y(t):

plot2d([discrete, makelist([res[i][1],res[i][3]], i, 1, length(res))])$

x(t), with axes labels:

plot2d([discrete, makelist([res[i][1],res[i][2]], i, 1, length(res))],
[xlabel,"t"], [ylabel,"y"])$

Regards,
Jaime