MathGroup Archive 2002

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

Search the Archive

Re: Find many Roots

  • To: mathgroup at smc.vnet.net
  • Subject: [mg32323] Re: Find many Roots
  • From: liwen liwen <gzgear at yahoo.com>
  • Date: Tue, 15 Jan 2002 02:29:59 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,
There is another good routine for such problem--RootSearch function, we can find it in Mathsource.
Here is the running result of using RootSearch function:

In[1]:=
Needs["Enhancements`RootSearch`"]

In[28]:=
f[x_]:=x*Sin[x]-Cos[x];
Plot[f[x],{x,0,10}];
soln=RootSearch[f[x]\[Equal]0,{x,0,10}];
x/.soln

Out[31]=
{0.860334,3.42562,6.4373,9.52933}



  • Prev by Date: polar curve
  • Next by Date: Entering constant placeholders
  • Previous by thread: Re: Find many Roots
  • Next by thread: Re: Front end problems!