| Author |
Comment/Response |
Michael
|
 06/30/12 6:09pm
In Response To 'Re: Solving Coupled Diff Eqs ( Simple )'
---------
Have you looked at your solutions? For instance T[t] can be solved exactly and for t between 0.01, 1.2, the value of T[t] is between 0.10000000057, 0.10000006928. At MachinePrecision, these both round to 0.1. For all intents and purposes, ParametricPlot produces a graph that consists of a point.
Try this (the Epilog plots the beginning and endpoints of the graph at different colors and sizes):
ParametricPlot[(Evaluate[{T[t], \[Beta][t]} /. s]), {t, a, b},
PlotRange -> All,
Epilog -> {PointSize[0.05], Green,
Point[({T[t], \[Beta][t]} /. s[[1]]) /. {t -> a}],
PointSize[Large], Red,
Point[({T[t], \[Beta][t]} /. s[[1]]) /. {t -> b}]}]
URL: , |
|
