Re: plot command

• To: mathgroup at smc.vnet.net
• Subject: [mg58134] Re: plot command
• From: "Stefan Linnik" <sjl.news56 at tiscali.co.uk>
• Date: Sun, 19 Jun 2005 03:43:52 -0400 (EDT)
• References: <d90spv\$8va\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```sol = Log[v] ==A*9100*Log[s]
(*
use == for 'equals'
= is for assigment

Did you mean A*9100 (or A space 9100 ) instead of the variable A9100  ?
*)

sol2 = Solve[sol,v]
sol2a= sol2[[1, 1,-1]]
(*
This returns a rule suitable for Replace[]
The [[1, 1,-1]] ( or Part[sol2, 1, 1,-1] ) extracts just the expression to
plot
*)

sol3 = D[sol2a, s]
A=0.0005; (* or whatever *)
Plot[sol3,{s,0,100}];

Stefan Linnik
~~~~~~~~

"Bosch, Darrell" <bosch at vt.edu> wrote in message
news:d90spv\$8va\$1 at smc.vnet.net...
>
> Dear Group:  I am trying to solve an equation, take the derivative and
> plot the derivative as shown below.  I get a message below the Plot
> request stating
>
> "Syntax::sntxi: "Incomplete expression; more input is needed."  Any help
> would be greatly appreciated.  Darrell Bosch
>
>
>
>
>
>
>
> sol = Log[v]=A9100*Log(s)
>
> sol2 = Solve[sol,v]
>
> sol3 = D[sol2,s]
>
> Plot[Evaluate[sol3],{s,0,100}]
>
>
>
>

```

• Prev by Date: position of a pattern in a list
• Next by Date: Re: Did something change?
• Previous by thread: Re: plot command
• Next by thread: Re: plot command