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