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

```

• Prev by Date: Nonlinear curve-fitting difficult functions
• Next by Date: Re: Re: Problem with collect
• Previous by thread: Re: Solve and Plot
• Next by thread: Re: Integer Solutions