Differential Equation: Not getting result
- To: mathgroup at smc.vnet.net
- Subject: [mg127329] Differential Equation: Not getting result
- From: Rahul Chakraborty <rahul.6sept at gmail.com>
- Date: Tue, 17 Jul 2012 01:31:45 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
Dear all, For the following code i'm not getting result. kindly tell me where i'm making mistake. Clear[x]; r=1; K=1; eqn= (x^')[t]-r x[t] (1-x[t]/K)==0//Simplify; sol=NDSolve[{eqn,x[0]==1/2,x'[0]==0},x[t],{t,0,50}][[1]] ParametricPlot[Evaluate[{x[t]/.sol,D[x[t]/.sol,t]}],{t,0,50},Frame->True,AxesLabel->{"x",Overscript[x,"."]},AspectRatio->1] ParametricPlot[Evaluate[{t,x[t]/.sol}],{t,0,50},Frame->True,AxesLabel->{"t","x"},AspectRatio->1] Regards, rc
- Follow-Ups:
- Re: Differential Equation: Not getting result
- From: Bob Hanlon <hanlonr357@gmail.com>
- Re: Differential Equation: Not getting result
- From: Oliver Ruebenkoenig <ruebenko@wolfram.com>
- Re: Differential Equation: Not getting result
- From: Murray Eisenberg <murray@math.umass.edu>
- Re: Differential Equation: Not getting result