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