Re: upper and lower bound for the unknowns
- To: mathgroup at smc.vnet.net
- Subject: [mg42390] Re: upper and lower bound for the unknowns
- From: bobhanlon at aol.com (Bob Hanlon)
- Date: Fri, 4 Jul 2003 01:33:09 -0400 (EDT)
- References: <be10f5$2lq$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Needs["Statistics`NonlinearFit`"];
data1=Flatten[
Table[{x,wx,(5*Exp[1/(wx)])/(500-x)^2},{x,50,450,50}, {wx,5,20,5}],1];
NonlinearFit[data1,(A*Exp[1/(wx)])/(B-x)^2,{x,wx},{{A,3},{B,600}}]
(4.999999999999999*E^(1/wx))/(500. - x)^2
NonlinearFit[data1,(A*Exp[1/(wx)])/(B-x)^2,{x,wx},{{A,3,10},{B,99,999}}]
(5.*E^(1/wx))/(500. - x)^2
data2=Flatten[
Table[{x,1/wx,(5*Exp[1/(wx)])/(500-x)^2},{x,50,450,50}, {wx,5,20,5}],1];
NonlinearFit[data2,(A*Exp[1/(wx)])/(B-x)^2,{x,1/wx},{{A,3},{B,600}}]
(4.999999999999999*E^(1/wx))/(500. - x)^2
NonlinearFit[data2,(A*Exp[1/(wx)])/(B-x)^2,{x,1/wx},{{A,3,10},{B,99,999}}]
(5.*E^(1/wx))/(500. - x)^2
Bob Hanlon
In article <be10f5$2lq$1 at smc.vnet.net>, ce.choa.phen.kee at philips.com wrote:
<< Anyone has any idea of giving a range for the A and B values as follows??
NonlinearFit [data , (A*Exp[1/(wx)]) / (B-x)^2 , {x,1/(wx)} , {{A,3} ,
{B,600}}]
I tried putting upper and lower bound inside the function i.e {{A , 0 , 4}
, {B , 55 , 180}} but it gave me error message. May I know what has gone
wrong??