Re: definite integral
- To: mathgroup at smc.vnet.net
- Subject: [mg49350] Re: definite integral
- From: BobHanlon at aol.com
- Date: Fri, 16 Jul 2004 06:06:32 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Clear[y];
y=y/.NDSolve[{y'[x]==y[x],y[1]==2},y,{x,0,3}][[1]];
Plot[y[t],{t,0,0.5},PlotRange->{-.1,1.5}];
Integrate[y[t], {t,0,0.1}]
0.0773804
Bob Hanlon
> In a message dated Thu, 15 Jul 2004 11:11:14 +0000 (UTC), <
> Josh at Killer.K> writes: from the solution of a system of 2 differential equations
>
> sol=NDSolve[{v'[t]==10^3*i[t],
> y'[t]== etc...
>
> I get the solution y[t] for t \in [0,1], and I can plot it with the command:
>
> Plot[Evaluate[y[t]/.sol],{t,0,0.5}, PlotRange->{-2,2}]
>
> but I have also to compute the definite integral of y[t], between 0 and
> 0.1, how can I do?