Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

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

Search the Archive

Re: How to plot this

  • To: mathgroup at smc.vnet.net
  • Subject: [mg64461] Re: [mg64416] How to plot this
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Fri, 17 Feb 2006 04:13:08 -0500 (EST)
  • Reply-to: hanlonr at cox.net
  • Sender: owner-wri-mathgroup at wolfram.com

eqn1=x+y==2*x*y;

Either solve the equation

Plot[Evaluate[y/.Solve[eqn1,y]],{x,1,3}];

or load the standard add-on package for implicit plots

Needs["Graphics`"];

ImplicitPlot[eqn1,{x,1,3},AspectRatio->1/GoldenRatio];


Bob Hanlon

> 
> From: siegmund natter <nobody at nomail.com>
To: mathgroup at smc.vnet.net
> Subject: [mg64461] [mg64416] How to plot this
> 
> 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)
> 
> 


  • Prev by Date: Re: How to plot this
  • Next by Date: Re: Eliminate Complex Roots
  • Previous by thread: Re: How to plot this
  • Next by thread: Re: How to plot this