Question: Differential Equation Solver

Hi all,

I am solving a system of ODEs numerically, and then plotting the results over time. I would really like Maple to show me the equation behind the plotted graphs. Through my searches I have not been able to find the code for that. Any help would be greatly appreciated. For example, how do I see the equation for W(t)?

sol1a := dsolve([Eq1a, Eq2a, Eq3a, H(0) = 4879, W(0) = 105000, R(0) = 0], numeric, method = rosenbrock, output = listprocedure)

plots[odeplot](sol1a, [t, W(t)], t = 0 .. 40, color = blue, style = point);

Your help is much appreciated!

Regards,

Steve

Please Wait...