06.08.2013 Views

内容简介作者简介 - 科学与工程计算系

内容简介作者简介 - 科学与工程计算系

内容简介作者简介 - 科学与工程计算系

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

16<br />

14<br />

12<br />

10<br />

8<br />

6<br />

4<br />

2<br />

y=3*exp(-0.4*x)+12*exp(-3.2*x)<br />

y est =2.8967*exp(-0.38045*x) + 11.983*exp(-3.0985*x)<br />

0<br />

0 0.5 1 1.5 2 2.5 3 3.5 4<br />

图 4.10-3<br />

24<br />

chi2=17.7066<br />

freedom=17<br />

Q=0.40757<br />

−a1x<br />

−a2<br />

x<br />

【例 4.10.2.2-2】以 y = b1e<br />

+ b2e<br />

为模型,从受污染的数据中,使用伪线性法估<br />

计 b = [ b1<br />

b2<br />

] ,使用 fminsearch 估计 a = [ a1<br />

a2<br />

] 。x, y 原始数据同上例。<br />

(1)<br />

[twoexps2.m]<br />

function E=twoexps2(a,x,y,b)<br />

%twoexps2.m<br />

x=x(:);y=y(:);Y=b(1)*exp(-a(1)*x)+b(2)*exp(-a(2)*x);<br />

E=sum((y-Y).^2);<br />

(2)<br />

[exm041022_2.m]<br />

%exm041022_2.m<br />

k_noise=0.3;<br />

[x,y,STDY]=xydata(k_noise);<br />

a0=[1 2]';<br />

options=optimset('fminsearch');<br />

options.TolX=0.001;<br />

options.Display='off';<br />

%<br />

while 1<br />

Mb=exp(-x*a0');<br />

b=Mb\y;<br />

a=fminsearch(@twoexps2,a0,options,x,y,b);<br />

r=norm(a-a0)/norm(a);<br />

if r

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!