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
>
>
>
>
>