Re: How to plot this
- To: mathgroup at smc.vnet.net
- Subject: [mg64427] Re: How to plot this
- From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
- Date: Fri, 17 Feb 2006 04:11:34 -0500 (EST)
- Organization: Uni Leipzig
- References: <dt1coe$5j$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
Needs["Graphics`ImplicitPlot`"]
eqn1 = x + y == 2*x*y;
ImplicitPlot[eqn1, {x, 1, 3}, {y, 0, 2}]
or
f = y /. Solve[eqn1, y][[1]]
Plot[Evaluate[f], {x, 1, 3}]
Regards
Jens
"siegmund natter" <nobody at nomail.com> schrieb im
Newsbeitrag news:dt1coe$5j$1 at smc.vnet.net...
| Hello
|
| Can anyone tell why this is wrong?
|
| eqn1 = x + y == 2*x*y;
| eqn1 /.y -> y[x];
| Plot[y[x], {x, 1, 3}]
|
| How do I do it correctly? (This is just an
example; I want to do this
| with a much more difficult equation)
| Thanks a lot.
|
| (I am using Mathematica 5.1)
|