Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1997
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1997

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

Search the Archive

Re: FindRoot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg8919] Re: FindRoot
  • From: Daniel Lichtblau <danl>
  • Date: Thu, 2 Oct 1997 22:57:15 -0400
  • Organization: Wolfram Research, Inc.
  • Sender: owner-wri-mathgroup at wolfram.com

David Djajaputra wrote:
> 
> I need to plot the root of a transcendental equation
> 
> sin(x)=x/a,     for a from 2 to 3.
> 
> I can find the root for each a using FindRoot. But how do I make a
> continuous plot
> using FindRoot?
> 
> Thanks a lot!
> 
> David Djajaputra


Maybe something like this? It will look for roots near x==2, and, as it
happens, I get a continuous graph for a in the range from 2 to 3.

f[a_] := FindRoot[Sin[x]==x/a, {x,2}]
Plot[x /.f[a], {a,2,3}]

Note that x==0 is always a root for the equation you gave.

Daniel Lichtblau
Wolfram Research
danl at wolfram.com


  • Prev by Date: Re: AxesLabels on the MacOS, mkdk
  • Next by Date: Re: Shaded Symbols in MultipleListPlot
  • Previous by thread: RE: FindRoot
  • Next by thread: Re: FindRoot