Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

[Date Index] [Thread Index] [Author Index]

Search the Archive

RE: right hand side

  • To: mathgroup at smc.vnet.net
  • Subject: [mg93561] RE: [mg93530] right hand side
  • From: "David Park" <djmpark at comcast.net>
  • Date: Fri, 14 Nov 2008 06:35:58 -0500 (EST)
  • References: <25064145.1226628585825.JavaMail.root@m02>

Copy into a notebook and evaluate:

aa = 2 x + 5 y == 1;

ContourPlot[Evaluate[aa], {x, -5, 5}, {y, -5, 5},
 Axes -> True]

An alternative method:

Print["My equation"]
aa
Print["Solve the equation for y"]
Solve[aa, y]
Print["Extract the solution rule"]
Part[%%, 1, 1]
Print["Define a plotting function f[x]"]
f[x_] = y /. %%

Now plot f[x].

Plot[f[x], {x, -5, 5},
 Frame -> True,
 Axes -> True]


David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark 





From: magdamoczydlowska at gmail.com [mailto:magdamoczydlowska at gmail.com] 


Hello Everyone!

I suppose that my question can be very easy. I will translate it on
simple equation,
aa = 2*x + 5*y == 1, I need to plot this equation so i take Reduce
[aa,y], the result is following y == 1/5 - (2 x)/5. Now I would like
to take right side of equation to plot 1/5-(2x)/5. However I do not
know how to do it.

Thank you for help,
Magdalena




  • Prev by Date: Re: How to export values of an expression as data file?
  • Next by Date: Re: Model the surface of an ellipsoid
  • Previous by thread: Re: right hand side
  • Next by thread: Re: right hand side