Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'plnr with plot' topicStudent Support Forum > General > "plnr with plot"

Next Comment >Help | Reply To Topic
Author Comment/Response
Hari
12/17/04 12:37pm

Hi,
I was trying to solve three coupled differential equations and to plot one among them. But while plotting it gives the following message,

In[1]=sol == NDSolve[{T'[
t] == (237.98 xoh'[t] + 104.76 xw'[t])/ (1.8 + 0.987 xw[t]),
xoh'[t] ==
238.5 Exp[-4853.27/T[t]] (1 - xoh[t]) (9.745 - xoh[t] - 9.745 xw[t]),
xw'[t] == 1385 (1 - xw[t]) Exp[-3928.314/T[t]], T[0] == 298,
xoh [0] == 0, xw[0] == 0}, {T, xoh, xw}, {t, 0, 200},
MaxStepSize -> 200]

Out[1]sol == {{T -> InterpolatingFunction[{{0., 200.}}, "<>"],
xoh -> InterpolatingFunction[{{0., 200.}}, "<>"],
xw -> InterpolatingFunction[{{0., 200.}}, "<>"]}}

In[2]=Plot[T[t], {t, 0, 200}]

Plot::"plnr": "\!\(T[t]\) is not a machine-size real number at \!\(t\) = \
\!\(8.333333333333334`*^-6\)."

Please help.Thanks in advance
Hari


URL: ,

Subject (listing for 'plnr with plot')
Author Date Posted
plnr with plot Hari 12/17/04 12:37pm
Re: plnr with plot Henry Lamb 12/18/04 4:33pm
Next Comment >Help | Reply To Topic