Re: Use of NonlinearRegress[..., ShowProgress -> True,...] Option Output.

• To: mathgroup at smc.vnet.net
• Subject: [mg34801] Re: [mg34740] Use of NonlinearRegress[..., ShowProgress -> True,...] Option Output.
• From: BobHanlon at aol.com
• Date: Fri, 7 Jun 2002 01:09:07 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```In a message dated 6/4/02 5:10:22 AM, heinemann at hmi.de writes:

>I want to use the output of the NonlinearRegress[] function option:
>ShowProgress -> True.
>
>...
>Iteration:2 ChiSquared:21.06194755583588` \
>Parameters:{0.220634,5.06267,3.95254,4.29661,0.350122,0.516797,-0.000112304,5

.\
>15095,1.02879,0.3}
>
>Iteration:6 ChiSquared:1.6841295804356515` \
>Parameters:{0.211089,5.17294,4.21411,4.14313,0.353888,0.422795,-0.00231333,4.
\
>18785,2.59554,-0.455421}
>...
>
>>From that I have to create a list of the form:
{{Iterationstep,{Parameters}},...}
>I failed(Yes with the simple copy and paste methode it works) but my aim is
>to make this procedure automatically. Do you have any idee how I can solve
>this problem ?
>

Here is a rough "hit it with a hammer" approach:

Needs["Statistics`NonlinearFit`"];

data={{1.0,1.0,.126},{2.0,1.0,.219},
{1.0,2.0,.076},{2.0,2.0,.126},{.1,.0,.186}};

param = {theta1,theta2,theta3};

NonlinearRegress[data,
theta1 theta3 x1/(1+theta1 x1+theta2 x2),
{x1,x2},param,
RegressionReport->BestFitParameters,
ShowProgress->True]

Append[n=1;

Cases[Take[NotebookGet[SelectedNotebook[]],{-5}],

x:{__?NumberQ}:>{n++, x}, Infinity],

{n, param /. (BestFitParameters/.%)}]

Bob Hanlon
Chantilly, VA  USA

```

• Prev by Date: Graphics
• Next by Date: RE: Is it possible to access internal variables? [CompoundExpression]
• Previous by thread: Use of NonlinearRegress[..., ShowProgress -> True,...] Option Output.
• Next by thread: Warning Messages on Notebooks Produced by Later Versions