Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: How to get data from solvin' numerically differential equation?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg104155] Re: How to get data from solvin' numerically differential equation?
  • From: "Nasser M. Abbasi" <nma at 12000.org>
  • Date: Wed, 21 Oct 2009 06:30:38 -0400 (EDT)
  • References: <hbjtju$5su$1@smc.vnet.net>

"?????? ?????????" <shalm89 at gmail.com> wrote in message 
news:hbjtju$5su$1 at smc.vnet.net...
> Hi,
> Mathematica solves numerically differential equation and makes
> interpolation. I can plot this interpolating function. Can I save all
> the points in a file or somehow get this data?
> Best regards, Mikhail Shalaginov.
>

sol = First[NDSolve[{Derivative[1][y][t] == t,y[0] == 1}, y, {t, 0, 3}]];
data = Table[{t, y[t] /. sol},{t, 0, 3, 0.1}];

Now you can save this data to a file,  plot it, etc...

Export["data.txt", data]
ListPlot[data, Joined -> True]

--Nasser 



  • Prev by Date: Wolfram|Alpha Homework Day
  • Next by Date: Mapping colours in DensityPlot
  • Previous by thread: Re: How to get data from solvin' numerically differential equation?
  • Next by thread: Re: How to get data from solvin' numerically differential equation?