| 查看: 1733 | 回復(fù): 12 | |||
lf0612木蟲 (小有名氣)
|
[求助]
呼叫版主,在線緊急求助,關(guān)于matlab中微分方程組參數(shù)擬合得問題! 已有2人參與
|
||
|
參考版主“月只藍”以前帖子中的代碼,寫了如下關(guān)于微分方程組中參數(shù)擬合得代碼,進行了修改,結(jié)果有問題,因為是新手,代碼的含義不全懂,加之時間急著要,所以特來求助,往各位高手多多幫助,在此先謝謝了! function k1k2k3 format long clear all clc tspan = [0 1 2 3 4 5 6 7 8 9 10 ]; x0=[1 1 1 1 ]; k0 = [1 1 1 1 1 1 1 1 1 1 1 ]*1e-4; lb = [0 0 0 0 0 0 0 0 0 0 0]; ub = [1 1 1 1 1 1 1 1 1 1 1 ]*1e5; data=[0.012,0.073,0.089,0.092,0.316,0.498,1.810,2.314,0.679,0.063,0.044; 0.005,0.084,0.093,0.270,0.406,0.642,0.814,1.026,0.422,0.053,0.014; 0.037,0.638,0.969,2.057,20.419,39.655,69.107,34.099,5.657,0.697,0.346; 0.008,0.224,0.234,0.347,1.860,2.854,3.786,1.883,0.601,0.157,0.079; ]'; size(data); yexp = data; [k,resnorm,residual,exitflag,output,lambda,jacobian] =lsqnonlin(@ObjFunc,k0,lb,ub,[],tspan,x0,yexp); ci = nlparci(k,residual,jacobian); fprintf('\n\n使用函數(shù)lsqnonlin()估計得到的參數(shù)值為:\n') fprintf('\tk1 = %.16f \n',k(1)) fprintf('\tk2 = %.16f \n',k(2)) fprintf('\tk3 = %.16f \n',k(3)) fprintf('\tk4 = %.16f \n',k(4)) fprintf('\tk5 = %.16f \n',k(5)) fprintf('\tk5 = %.16f \n',k(6)) fprintf('\tk5 = %.16f \n',k(7)) fprintf('\tk5 = %.16f \n',k(8)) fprintf('\tk5 = %.16f \n',k(9)) ts=0:1:max(tspan); [ts ys]=ode45(@KineticsEqs,ts,x0,[],k); [ttt XXsim] = ode45(@KineticsEqs,tspan,x0,[],k); figure(1), plot(ts,ys(:,1),'b',tspan(2:end),yexp(:,1),'or'),legend('計算值','實驗值','Location','best'); figure(2), plot(ts,ys(:,2),'b',tspan(2:end),yexp(:,2),'or'),legend('計算值','實驗值','Location','best'); figure(3), plot(ts,ys(:,3),'b',tspan(2:end),yexp(:,3),'or'),legend('計算值','實驗值','Location','best'); figure(4), plot(ts,ys(:,4),'b',tspan(2:end),yexp(:,4),'or'),legend('計算值','實驗值','Location','best'); function f = ObjFunc(k,tspan,x0,yexp) % 目標函數(shù) [t Xsim] = ode45(@KineticsEqs,tspan,x0,[],k); Xsim1=Xsim(:,1); Xsim2=Xsim(:,2); Xsim3=Xsim(:,3); Xsim4=Xsim(:,4); ysim(:,1) = Xsim1(2:end); ysim(:,2) = Xsim2(2:end); ysim(:,3) = Xsim3(2:end); ysim(:,4) = Xsim4(2:end); size(ysim(:,1)); size(ysim(:,2)); size(ysim(:,3)); size(ysim(:,4)); size(yexp(:,1)); size(yexp(:,2)); size(yexp(:,3)); size(yexp(:,4)); f = [(ysim(:,1)-yexp(:,1)) (ysim(:,2)-yexp(:,2)) (ysim(:,3)-yexp(:,3)) (ysim(:,4)-yexp(:,4)) ]; function dEdt = KineticsEqs(t,C,k) % ODE模型方程 %g(1)=k(4);g(2)=k(5);g(3)=k(6);m(1)=k(7);m(2)=k(8);m(3)=k(9); CA=C(1);CB=C(2);CC=C(3);CD=C(4); %dCAdt = k(1)*CA*(CB/2-1)-k(2)*CB+k(3)*CC; %dCBdt=-g(1)*CA+g(2)*CB.*(1-CB/5)+g(3)*CC.*(1-CC/10); %dCCdt=m(1)*CA.*(CA/2-1)-m(2)*CB-m(3)*CC; dCAdt= -k(1)*CA-k(2)*CA; dCBdt=k(1)*CA-k(3)*CB-k(4)*CB; dCCdt=k(3)*CB-k(5)*CC; dCDdt=k(2)*CA+k(4)*CB+k(5)*CC; dEdt=[dCAdt;dCBdt;dCCdt;dCDdt]; 在此感謝! |
主管區(qū)長 (職業(yè)作家)
![]() |
專家經(jīng)驗: +1059 |

木蟲 (小有名氣)
主管區(qū)長 (職業(yè)作家)
![]() |
專家經(jīng)驗: +1059 |

木蟲 (小有名氣)
鐵桿木蟲 (職業(yè)作家)
木蟲 (小有名氣)
木蟲 (小有名氣)
木蟲 (小有名氣)
鐵蟲 (小有名氣)

| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 0703化學調(diào)劑,求各位老師收留 +9 | 秋有木北 2026-03-14 | 9/450 |
|
|---|---|---|---|---|
|
[考研] 0703化學 305求調(diào)劑 +3 | FY_yy 2026-03-14 | 3/150 |
|
|
[考研] 295求調(diào)劑 +3 | 一志愿京區(qū)211 2026-03-18 | 5/250 |
|
|
[考研] 化學工程321分求調(diào)劑 +15 | 大米飯! 2026-03-15 | 18/900 |
|
|
[考研] 一志愿西南交大,求調(diào)劑 +4 | 材化逐夢人 2026-03-18 | 4/200 |
|
|
[考研] 0703化學調(diào)劑 ,六級已過,有科研經(jīng)歷 +10 | 曦熙兮 2026-03-15 | 10/500 |
|
|
[考研] 材料專碩274一志愿陜西師范大學求調(diào)劑 +6 | 薛云鵬 2026-03-13 | 6/300 |
|
|
[考研] 302求調(diào)劑 +10 | 呼呼呼。。。。 2026-03-17 | 10/500 |
|
|
[考研] 280求調(diào)劑 +6 | 咕嚕曉曉 2026-03-18 | 7/350 |
|
|
[考研] 332求調(diào)劑 +6 | Zz版 2026-03-13 | 6/300 |
|
|
[考研] 085600材料與化工求調(diào)劑 +5 | 緒幸與子 2026-03-17 | 5/250 |
|
|
[考研] 290求調(diào)劑 +6 | 孔志浩 2026-03-12 | 11/550 |
|
|
[考研] 材料與化工專碩調(diào)劑 +5 | heming3743 2026-03-16 | 5/250 |
|
|
[考研] 302求調(diào)劑 +4 | 小賈同學123 2026-03-15 | 8/400 |
|
|
[考研] 285化工學碩求調(diào)劑(081700) +9 | 柴郡貓_ 2026-03-12 | 9/450 |
|
|
[考研] [導(dǎo)師推薦]西南科技大學國防/材料導(dǎo)師推薦 +3 | 尖角小荷 2026-03-16 | 6/300 |
|
|
[考研] 326求調(diào)劑 +4 | 諾貝爾化學獎覬?/a> 2026-03-15 | 7/350 |
|
|
[考研] 085600材料與化工 求調(diào)劑 +13 | enenenhui 2026-03-13 | 14/700 |
|
|
[考研] 255求調(diào)劑 +3 | 李嘉慧, 2026-03-12 | 4/200 |
|
|
[考研] 081200-11408-276學碩求調(diào)劑 +3 | 崔wj 2026-03-12 | 4/200 |
|