www.pudn.com > 实验7-线形拟合.rar > examp072.m

x0=[1,1];a=10;b=1; 
format short e 
fopt1=optimset('Display','iter'); 
[x,f,exitf]=fminunc('fun071',x0,fopt1,a,b); 
x,f,exitf 
pause 
 
fopt2=optimset('TolFun',1e-8,'TolX',1e-8); 
[x,f,exitf,output,grad]=fminunc('fun071',x0,fopt2,a,b); 
x,f,exitf,output,grad 
pause 
 
fopt3=optimset('TolFun',1e-1,'TolX',1e-1); 
[x,f,exitf,output,grad]=fminunc('fun071',x0,fopt3,a,b); 
x,f,exitf,output,grad