 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
小木蟲論壇-學術科研互動平臺 » 計算模擬區(qū) » 計算模擬 » 理論與計算方法 » matlab擬合反應動力學
| 5 | 1/1 | 返回列表 |
| 查看: 1685 | 回復: 9 | ||
| 【懸賞金幣】回答本帖問題，作者hzd250將贈送您 10 個金幣 | ||
| 當前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖 | ||
[求助]
matlab擬合反應動力學 已有2人參與
|
||
|
剛入門matlab的小白，最近想做反應的動力學，按照B站up主的視頻自己寫了一段代碼，但是運行總是出問題： 錯誤使用 odearguments (第 93 行)；FUNC 必須返回列向量，出錯 ode45 (第 115 行)，odearguments(FcnHandlesUsed, solver_name, ode, tspan, y0, options, varargin); 出錯 Kinetics>fun (第 67 行)，[t,x]=ode45(@func,tspan,x0,[],k)； 出錯 lsqnonlin (第 218 行)，initVals.F = feval(funfcn{3},xCurrent,varargin{:});出錯 Kinetics (第 18 行)，lsqnonlin(@fun,k0,lb,ub,[],yexp);%非線性最小二乘法。原因:Failure in initial objective function evaluation. LSQNONLIN cannot continue. 下面是我寫的代碼，讀取的Excel表格里有5列*7行的實驗數(shù)據(jù)，勞煩大佬幫我瞅瞅哪里需要改動，萬分感謝。 function Kinetics %反應一：A+B=C+M %r=k*XA*XB-K*XC*XM %反應二：A+C=D+M %r=K*XA*XC-K*XD*XM %反應三：B+C=E+M %r=K*XB*XC-K*XE*XM %XM=0.175 clc clear all; global a b tspan=[0.5 1 4 6 8 12 16]; yexp=xlsread('reaction.xls'); k0=[0.1 0.01 0.01 0.001 0.001 0.001];%參數(shù)初值 lb=[0 0 0 0 0 0];%下邊界 ub=[+inf +inf +inf +inf +inf +inf];%上邊界 [k,resnorm,residual,exitflag,output,lambda,jacobian]=... lsqnonlin(@fun,k0,lb,ub,[],yexp);%非線性最小二乘法 tspan=[0.5 1 4 6 8 12 16]; a=1; b=a+6; x0=yexp(a,  ;%積分初值[t,x]=ode45(@func,tspan,x0,[],k); t1=linspace(0.5,16,200); ya1=spline(t,x(:,1),t1);%動力學計算得到的點進行樣條插值 ya2=spline(t,x(:,2),t1); ya3=spline(t,x(:,3),t1); ya4=spline(t,x(:,4),t1); ya5=spline(t,x(:,5),t1); for m=1:7 for n=1:5 yy(a+m-1,n)=x(m,n);%每一次的值存入yy矩陣 end end figure(1) plot(tspan,yexp(a:b,1),'k^',t1,ya1,'k-',tspan,yexp(a:b,2),'ro',t1,ya2,'r-',tspan,yexp(a:b,3),'bd',t1,ya3,'b-',... tspan,yexp(a:b,4),'g*',t1,ya4,'g-',tspan,yexp(a:b,5),'yp',t1,ya5,'y-'); legend('','A濃度','','B濃度','','C濃度','','D濃度','','E濃度'); xlabel('t(h)');ylabel('濃度(mol/L)');title('170℃ 0.1wt%催化劑'); t1=linspace(0.5,16,200); z1=spline(t,yy(1:7,1),t1); h1=spline(t,yy(1:7,2),t1); s1=spline(t,yy(1:7,3),t1); b1=spline(t,yy(1:7,4),t1); u1=spline(t,yy(1:7,5),t1); xlswrite('result.xls',[t1' z1' h1' s1' b1' u1'],'sheet1'); xlswrite('result.xls',residual,'sheet2'); Ne = length(yexp(:,2)); %模型適定性判別 Np = length(k); [rho2,F] = rho2_F(k,yexp,resnorm,Ne,Np); ci=nlparci(k,residual,jacobian) fprintf('\t k1,0=%.1f ± %.4f\n',k(1),ci(1,2)-k(1)); fprintf('\t k2,0=%.1f ± %.4f\n',k(2),ci(2,2)-k(2)); fprintf('\t k3,0=%.1f ± %.4f\n',k(3),ci(3,2)-k(3)); fprintf('\t k4,0=%.1f ± %.4f\n',k(4),ci(4,2)-k(4)); fprintf('\t k5,0=%.1f ± %.4f\n',k(5),ci(5,2)-k(5)); fprintf('\t 殘差平方和：%.3f\n',resnorm) fprintf('\t 實驗點數(shù)和自由度分別為 Ne = %d和 Np = %d\n',Ne,Np) fprintf('\t 決定性指標ρ^2: %.4f\n',rho2) fprintf('\t F比: %.3f\n\n',F) %================================================================================= function f=fun(k,yexp) f=[]; tspan=[0.5 1 4 6 8 12 16]; a=1; x0=yexp(a, ;[t,x]=ode45(@func,tspan,x0,[],k) d=a+6; yc1=x(:,1); yc2=x(:,2); yc3=x(:,3); yc4=x(:,4); yc5=x(:,5); f11=yexp(a:d,1)-yc1; f12=yexp(a:d,2)-yc2; f13=yexp(a:d,3)-yc3; f14=yexp(a:d,4)-yc4; f15=yexp(a:d,5)-yc5; ff=[f11 f12 f13 f14 f15]; f=[f;ff]; %================================================================================= function dxdt=func(t,x,k) r1=-k(1)*x(1)*x(2)-k(2)*x(1)*x(3)+k(4)*x(3)*0.175+k(5)*x(4)*0.175; r2=-k(1)*x(1)*x(2)-k(3)*x(2)*x(3)+k(4)*x(3)*0.175+k(6)*x(5)*0.175; r3=k(1)*x(1)*x(2)+k(5)*x(4)*0.175+k(6)*x(5)*0.175-k(2)*x(1)*x(3)-k(3)*x(2)*x(3)-k(4)*x(3)*0.175; r4=k(2)*x(1)*x(3)-k(5)*x(4)*0.175; r5=k(3)*x(2)*x(3)-k(6)*x(5)*0.175; dxdt=[r1 r2 r3 r4 r5] %================================================================================= function [rho2,F] = rho2_F(k,yexp,s,Ne,Np) y=yexp.^2; sy = sum(y( );rho2 = 1 - s/sy; %rho2: 決定性指標 F = (sy - s)*(Ne-Np)/(Np*s); %F：F比 |
回復此樓» 猜你喜歡
幫我的英語口語老師找學生
已經(jīng)有4人回復
-
計算三階力常數(shù)用thirdorder擴胞時參數(shù)如何選擇？臨近原子數(shù)怎么取值
已經(jīng)有7人回復
-
物理學I論文潤色/翻譯怎么收費?
已經(jīng)有285人回復
-
2026年循環(huán)經(jīng)濟功能材料國際會議（ICFMCE 2026）
已經(jīng)有0人回復
-
2026年第五屆電氣、電子與信息工程國際會議（ISEEIE 2026）
已經(jīng)有0人回復
-
哈爾濱理工大學物理系招收物理學考研調劑
已經(jīng)有1人回復
-
0702一志愿吉大B區(qū)求調劑
已經(jīng)有2人回復
-
求調劑
已經(jīng)有0人回復
-
0702一志愿吉大B區(qū)求調劑有論文
已經(jīng)有0人回復
-
請問還有沒有用Latex寫文章的小伙伴們？
已經(jīng)有0人回復
送紅花一朵 
10樓2021-05-20 13:09:46
hzlhm
至尊木蟲 (著名寫手)
- 應助: 387 (碩士)
- 金幣: 17808.5
- 紅花: 53
- 帖子: 2879
- 在線: 606.3小時
- 蟲號: 1517335
- 注冊: 2011-11-30
- 性別: GG
- 專業(yè): 常微分方程與動力系統(tǒng)
2樓2021-05-17 22:00:00
3樓2021-05-18 10:22:08
4樓2021-05-18 10:52:35
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 289求調劑 +4 | 步川酷紫123 2026-03-11 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 泣血叩求調劑恩，愿以丹心報師恩 +5 | Iuruoh 2026-03-11 | 5/250 |
|
|
|
[考研] 293求調劑，一志愿陜師大生物學 +3 | ??????.?.??? 2026-03-09 | 3/150 |
|
|
|
[考研] 279求調劑 +3 | 莫xiao 2026-03-10 | 4/200 |
|
|
|
[考研] 標題:撿漏預警|08工科/09農學調劑!英語要求低，過線即有機會! +7 | 馬超放煙花 2026-03-07 | 12/600 |
|
|
|
[考研] 086000生物與醫(yī)藥319分求調劑 +4 | Tolkien 2026-03-07 | 8/400 |
|
|
|
[考研] 材料工程專碩調劑自薦信，初試323 +6 | 李白26 2026-03-07 | 6/300 |
|
|
|
[考研] A區(qū)一本交叉課題組，低分調劑，招收機械電子信息通信等交叉方向 +56 | lisimayy 2026-03-04 | 73/3650 |
|
|
|
[考研] 物理學求調劑 +4 | sx宋 2026-03-05 | 4/200 |
|
|
|
[考研] 085701環(huán)境工程295求調劑，一志愿A區(qū)211 +8 | 等春來， 2026-03-06 | 9/450 |
|
|
|
[基金申請] 面上項目還需要AI說明嗎？ +3 | liyundong 2026-03-08 | 3/150 |
|
|
|
[考研] 一志愿南大化學339分求調劑，四六級已過，有比賽，有文章 +7 | Gallantzhou 2026-03-07 | 7/350 |
|
|
|
[考研] 0856求調劑 +3 | squirtle11 2026-03-07 | 3/150 |
|
|
|
[考研] 297求調劑 +3 | 胡達靈 2026-03-05 | 5/250 |
|
|
|
[考研] 301求調劑 +11 | 朝天椒的雙馬尾 2026-03-05 | 11/550 |
|
|
|
[考研] 一志愿中國石油大學（華東） 本科齊魯工業(yè)大學 求調劑 +3 | snw石 2026-03-07 | 3/150 |
|
|
|
[考研] 304求調劑 +4 | 52hz~~ 2026-03-05 | 5/250 |
|
|
|
[考研] 一志愿哈爾濱工業(yè)大學0856材料與化工，前三科206，總分283，求調劑 +7 | 26考研求調劑 2026-03-06 | 7/350 |
|
|
|
[考研] 271求調劑 +7 | 月色c 2026-03-05 | 8/400 |
|
|
|
[考研] 304求調劑 +4 | 曼殊2266 2026-03-05 | 4/200 |
|