Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*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 2005

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

Search the Archive

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