Re: Re: Solve and Plot
- To: mathgroup at smc.vnet.net
- Subject: [mg6589] Re: [mg6529] Re: Solve and Plot
- From: Richard Finley <trfin at fiona.umsmed.edu>
- Date: Fri, 4 Apr 1997 02:11:38 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Michel The following is a one line solution to your problem: Plot[y/.Solve[3 x + 2 y - 4 == 0,y][[1,1]],{x,-5,5}] I do not guarantee that it is THE most elegant solution, but it is pretty simple. RF At 10:24 PM 3/30/97 -0500, you wrote: > > >Michel Gosse <michel.gosse at hol.fr> wrote in article ><5hdaum$dra at smc.vnet.net>... >| Hello >| I would like to solve an equation and then plot the solution. The command >: >| Plot[Solve[3x+2y-4==0,y]],{x,-5,5}] >| How can i do my plot in a one line command ? >| Regards. >| ************************************************************** >| * Michel Gosse | Email : michel.gosse at hol.fr * >| * 97, rue Joachim du Bellay | Webpage : coming soon... * >| * 86000 POITIERS | Phone : 33 549460970 * >| * FRANCE | Fax : 33 549460970 * >| ************************************************************** >| >| > >Plot[Evaluate[y/.Solve[3x^2+2y-4==0,y][[1]]],{x,-5,5}] > >Will do the trick ! > >Peter MEURIS > > > > >