Solution of diff. equation i the form of list?

*To*: mathgroup at smc.vnet.net*Subject*: [mg5517] Solution of diff. equation i the form of list?*From*: ufwlazlo at cyf-kr.edu.pl (Wojciech Wlazlo)*Date*: Sat, 14 Dec 1996 19:26:12 -0500*Organization*: Academic Computer Center CYFRONET Krakow*Sender*: owner-wri-mathgroup at wolfram.com

Hi! Can you write how to get the solution of differential equation in the form of list. I tried to achievie it in that way: DSolve[{z'[x]==-z[x],z[0]==1},z[x],x] data=Table[{x,z[x] /. %},{x,0.0,1.5,0.1}] and I got: {{z[x]->Exp[-x]}} {{{0.0,{1.0}},{0.1,{0.8}}, etc ^ ^ ^ ^ How to get rid of above extra {}'s? If I use "data" list in "ListPlot[data]" function I got errors. If you know what to do please post or e-mail. Thanks in advance. Best regards Wojtek Wlazlo ufwlazlo at kinga.cyf-kr.edu.pl