Re: FindRoot
- To: mathgroup at smc.vnet.net
- Subject: [mg47444] Re: FindRoot
- From: "Bobby" <drbob at bigfoot.com>
- Date: Mon, 12 Apr 2004 03:44:58 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Try this instead:
FindRoot[Sin[x] == x/2, {x, 10}, StepMonitor :> Print[{x, Sin[x] - x/2}]]
{5.859802116237182,
-3.3407483259106083}
{7.779913897338607,
-2.892698709682078}
{0.9895408254367455,
0.3410035333295145}
{0.2946601858653466,
0.14308460551880442}
{-0.01850315074790676,
-0.009250519581930038}
{4.22454210052825*^-6,
2.1122710502515594*^-6}
{-5.026293509007018*^-17,
-2.513146754503509*^-17}
{x -> -5.026293509007018*^-17}
Bobby R. Treat
StringReplace["lAWyerbillAtsmallfoot.com"//ToLowerCase,Rule@@@Reverse/@ToLow
erCase//@{{"dR","lAwyer"},{"@","AT"},{"bIg","small"},{"bOb","bill"}}]
"Bruce W. Colletti" <bcolletti at compuserve.com> wrote in message
news:<c5b1av$7n7$1 at smc.vnet.net>...
> Am using Mathematica 5.0.1.0 under WinXP Home, and am testing the
> function below. Taken from a book on Mathematica 4.0, the example says:
>
>
> FindRoot[Print[x]; Sin[x] == x/2, {x, 10}]
>
> returns the evolving solutions before terminating with a solution.
>
> However, when I run this, it doesn't display evolving solutions. Is
> this a difference between v4.0 and 5.0, or is the above command wrong
> (although taken verbatim from the book)?
>
> Thankx.
>
> Bruce