MathGroup Archive 2004

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

Search the Archive

Re: How to Plot this equation ?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg47118] Re: How to Plot this equation ?
  • From: "Bill" <wkb at aansto.gov.au>
  • Date: Fri, 26 Mar 2004 03:56:13 -0500 (EST)
  • Organization: Australian Nuclear Science and Technology Organisation
  • References: <c3uekb$9u0$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

"why" <m004202002 at yahoo.com> wrote in message
news:c3uekb$9u0$1 at smc.vnet.net...
> Hi,
>
> How I can Plot tis equation with mathematica?
>
> x exp(xy+0.8) + exp(y^2)=3
>
> Please help me .
>
> Thank You .


crv = Table[{x, y /. FindRoot[x Exp[x y + 0.8] + Exp[y^2] == 3, {y,
0.001}]}, {x, -5, 5, 0.1}];
ListPlot[crv, PlotJoined -> True];

Bill



  • Prev by Date: Re: exporting fonts in postscript
  • Next by Date: Re: eps export
  • Previous by thread: Re: How to Plot this equation ?
  • Next by thread: RE: How to Plot this equation ?