Plotting two functions

*To*: mathgroup at smc.vnet.net*Subject*: [mg78326] Plotting two functions*From*: SK <skhushrushahi at gmail.com>*Date*: Thu, 28 Jun 2007 04:29:53 -0400 (EDT)

Hi I have a 5th order equation of the form eqntony445=r^5+(alpha*X)*r^4+(beta+Pp)*r^3+(delta*X)*r^2+(gamma+Pp)*r +c*X==0 where alpha, beta, delta and gamma are other combination of terms that I havent included for the sake of simplicity. I can plot X with respect to r for various values of Pp Plot[Evaluate[Table[X /. Flatten[Solve[eqntony445 == 0, X]], {Pp, 0, 20, 5}]], {r, -0.5, 0.5}] The problem is I have another function of the form V=Integrate[ ((Pp)/(s)*((r^3+r)/(r^2+1)^2)+2*r,X] and need to plot it with respect to X. It keeps spitting out stuff of the form Root, which is understandable for 5th order equations, but I find that if I can plot V with respect to r then there must be a way I can take those r values and translate them to X values. Any help will be greatly appreciated. Thanks S