 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 4 | 1/1 | 返回列表 |
| 查看: 547 | 回復(fù): 3 | ||
你的CEO鐵蟲 (小有名氣)
|
[求助]
有關(guān)反應(yīng)動(dòng)力學(xué)推導(dǎo)的matlab程序
|
|
請(qǐng)蟲友大神幫小弟看看為啥誤差這么大，小弟在此謝過了 *****程序行數(shù)較多帖子不能完全 顯示，只能添加附件了，煩請(qǐng)大神幫看下，小弟在此謝過了！********* |
回復(fù)此樓» 猜你喜歡
322求調(diào)劑
已經(jīng)有10人回復(fù)
-
一志愿鄭大材料工程290求調(diào)劑
已經(jīng)有9人回復(fù)
-
26考研-291分-廈門大學(xué)（085601）-柔性電子學(xué)院材料工程專業(yè)求調(diào)劑
已經(jīng)有6人回復(fù)
-
考研調(diào)劑
已經(jīng)有8人回復(fù)
-
287求調(diào)劑
已經(jīng)有14人回復(fù)
-
材料學(xué)碩333求調(diào)劑
已經(jīng)有13人回復(fù)
-
279求調(diào)劑
已經(jīng)有9人回復(fù)
-
化工專碩求調(diào)劑
已經(jīng)有5人回復(fù)
-
求調(diào)劑
已經(jīng)有10人回復(fù)
-
0703化學(xué)求調(diào)劑
已經(jīng)有8人回復(fù)
你的CEO
鐵蟲 (小有名氣)
- 應(yīng)助: 2 (幼兒園)
- 金幣: 175.6
- 帖子: 71
- 在線: 18小時(shí)
- 蟲號(hào): 3071920
- 注冊(cè): 2014-03-19
- 性別: GG
- 專業(yè): 能源化工
|
function KineticsEst1_int % 動(dòng)力學(xué)參數(shù)辨識(shí): 用積分法進(jìn)行反應(yīng)速率分析得到速率常數(shù)k和反應(yīng)級(jí)數(shù)n % Analysis of kinetic rate data by using the integral method % Reaction of the type -- rate = kCA^order % order - reaction order % rate -- reaction rate vector % YA -- yield vector for reactant A % T -- vector of reaction time % N -- number of data points % k- reacion rate constant clear all clc format short global Y_exp Y_sim tspan = [0,21.065]; % t=w/F(MEOH.0),W:催化劑的質(zhì)量，F(xiàn)(MEOH.0)：甲醇的初始進(jìn)料流率 k0 = [0 0 0 0]; lb = [0 0 0 0]; ub = [+inf +inf +inf +inf ]; Y0 = [0 0 0 0 ]; Y_exp =[0.2245 0.0086 0.0013 0.0038; 0.2503 0.0082 0.0009 0.0018; 0.267 0.0098 0.0013 0.003; 0.2814 0.0094 0.0015 0.0012; ]; %同一空速四個(gè)不同組成配比下的反應(yīng)管出口生成物的收率Y % 使用函數(shù)lsqnonlin()進(jìn)行參數(shù)估計(jì) [k,resnorm,residual,exitflag,output,lambda,jacobian] = lsqnonlin(@ObjFunc,k0,lb,ub,optimset('TolFun',1.0000e-20),tspan,Y0,Y_exp); ci = nlparci(k,residual,jacobian) %[k,resnorm,residual,exitflag,output,lambda,jacobian] = lsqnonlin(@ObjFunc4LNL,k0,lb,ub,optimset('TolFun',1.0000e-6),Y0,Y_exp); %ci = nlparci(k,residual,jacobian) fprintf('\n\n使用函數(shù)lsqnonlin()估計(jì)得到的參數(shù)值為:\n') fprintf('\tk1 = %.4f ± %.4f\n',k(1),ci(1,2)-k(1)) fprintf('\tk2 = %.4f ± %.4f\n',k(2),ci(2,2)-k(2)) fprintf('\tk3 = %.4f ± %.4f\n',k(3),ci(3,2)-k(3)) fprintf('\tk4 = %.4f ± %.4f\n',k(4),ci(4,2)-k(4)) fprintf('\tThe sum of the squares is: %.1e\n\n',resnorm) %擬合效果圖(實(shí)驗(yàn)與擬合的比較) %[t4plot Y4plot] = ode45(@KineticsEqs1,[tspan(1) tspan(end)],Y0,[],k0) %figure %plot(tspan,Y_exp(:,1),'bo',t4plot,Y4plot(:,1),'r--'); %legend('Exp','Model') %xlabel('空時(shí)t=w/F_A_0, h') %ylabel('收率Y_D_M_M') %title('擬合效果圖') %figure %plot(tspan,Y_exp(:,2),'bo',t4plot,Y4plot(:,2),'r--'); %legend('Exp','Model') %xlabel('空時(shí)t=w/F_A_0, h') %ylabel('收率Y_M_F') %title('擬合效果圖') %figure %plot(tspan,Y_exp(:,3),'bo',t4plot,Y4plot(:,3),'r--'); %legend('Exp','Model') %xlabel('空時(shí)t=w/F_A_0, h') %ylabel('收率Y_F_A') %title('擬合效果圖') %figure %plot(tspan,Y_exp(:,4),'bo',t4plot,Y4plot(:,4),'r--'); %legend('Exp','Model') %xlabel('空時(shí)t=w/F_A_0, h') %ylabel('收率Y_D_M_E') %title('擬合效果圖') function f = ObjFunc(k,tspan,Y0,Y_exp) % 目標(biāo)函數(shù) [t,Y_sim1] = ode45(@KineticsEqs1,tspan,Y0,[],k) f1 = 1*(Y_sim1(end,1)-Y_exp(1,1)); f2= 10*(Y_sim1(end,2)-Y_exp(1,2)); f3= 10*(Y_sim1(end,3)-Y_exp(1,3)); f4= 10*(Y_sim1(end,4)-Y_exp(1,4)); [t,Y_sim2] = ode45(@KineticsEqs2,tspan,Y0,[],k) f5 = 1*(Y_sim2(end,1)-Y_exp(2,1)); f6 =10*(Y_sim2(end,2)-Y_exp(2,2)); f7 =10*(Y_sim2(end,3)-Y_exp(2,3)); f8 =10*(Y_sim2(end,4)-Y_exp(2,4)); [t,Y_sim3] = ode45(@KineticsEqs3,tspan,Y0,[],k) f9 = 1*(Y_sim3(end,1)-Y_exp(3,1)); f10 =10*(Y_sim3(end,2)-Y_exp(3,2)); f11 =10*(Y_sim3(end,3)-Y_exp(3,3)); f12 =10*(Y_sim3(end,4)-Y_exp(3,4)); [t,Y_sim4] = ode45(@KineticsEqs4,tspan,Y0,[],k) f13 = 1*(Y_sim4(end,1)-Y_exp(4,1)); f14 =10*(Y_sim4(end,2)-Y_exp(4,2)); f15 =10*(Y_sim4(end,3)-Y_exp(4,3)); f16 =10*(Y_sim4(end,4)-Y_exp(4,4)); f=[f1 f2 f3 f4; f5 f6 f7 f8; f9 f10 f11 f12; f13 f14 f15 f16; ] % ------------------------------------------------------------------ function dYdt = KineticsEqs1(t,Y,k) %p=[0.9 0.5 0.7 0.8 0.6]; %m=[0.6 0.4 0.5 0.3 0.25]; m:氧醇比 %n=[5.4 2 2 2.1 2]; % n:氮醇比 yMEOH1=(1+0.6)/(0.6+2.5*Y(1)+2*Y(2)+1.5*Y(3)+2*Y(4)+5.4); yO21=(0.6-0.5*Y(1)-Y(2)-0.5*Y(3))/(0.6+2.5*Y(1)+2*Y(2)+1.5*Y(3)+2*Y(4)+5.4); a=Y(1) dYdt=... [k(1)*(0.9^2)*yMEOH1^0.5*yO21^1.5; k(2)*(0.9^2)*yMEOH1^1*yO21^1; k(3)*(0.9^2)*yMEOH1^1*yO21^1; k(4)*(0.9^2)*yMEOH1^1.0*yO21^1; ]; function dYdt = KineticsEqs2(t,Y,k) %p=[0.9 0.5 0.7 0.8 0.6]; %m=[0.6 0.4 0.5 0.3 0.25]; m:氧醇比 %n=[5.4 2 2 2.1 2]; % n:氮醇比 yMEOH2=(1+0.4)/(0.6+2.5*Y(1)+2*Y(2)+1.5*Y(3)+2*Y(4)+2); yO22=(0.4-0.5*Y(1)-Y(2)-0.5*Y(3))/(0.4+2.5*Y(1)+2*Y(2)+1.5*Y(3)+2*Y(4)+2); dYdt=... [k(1)*(0.5^2)*yMEOH2^0.5*yO22^1.5; k(2)*(0.5^2)*yMEOH2^1*yO22^1; k(3)*(0.5^2)*yMEOH2^1*yO22^1; k(4)*(0.5^2)*yMEOH2^1.0*yO22^1; ]; function dYdt = KineticsEqs3(t,Y,k) %p=[0.9 0.5 0.7 0.8 0.6]; %m=[0.6 0.4 0.5 0.3 0.25]; m:氧醇比 %n=[5.4 2 2 2.1 2]; % n:氮醇比 yMEOH3=(1+0.5)/(0.6+2.5*Y(1)+2*Y(2)+1.5*Y(3)+2*Y(4)+2); yO23=(0.5-0.5*Y(1)-Y(2)-0.5*Y(3))/(0.5+2.5*Y(1)+2*Y(2)+1.5*Y(3)+2*Y(4)+2); dYdt=... [k(1)*(0.7^2)*yMEOH3^0.5*yO23^1.5; k(2)*(0.7^2)*yMEOH3^1*yO23^1; k(3)*(0.7^2)*yMEOH3^1*yO23^1; k(4)*(0.7^2)*yMEOH3^1.0*yO23^1; ]; function dYdt = KineticsEqs4(t,Y,k) %p=[0.9 0.5 0.7 0.8 0.6]; %m=[0.6 0.4 0.5 0.3 0.25]; m:氧醇比 %n=[5.4 2 2 2.1 2]; % n:氮醇比 yMEOH4=(1+0.8)/(0.6+2.5*Y(1)+2*Y(2)+1.5*Y(3)+2*Y(4)+2.1); yO24=(0.3-0.5*Y(1)-Y(2)-0.5*Y(3))/(0.3+2.5*Y(1)+2*Y(2)+1.5*Y(3)+2*Y(4)+2.1); dYdt=... [k(1)*(0.8^2)*yMEOH4^0.5*yO24^1.5; k(2)*(0.8^2)*yMEOH4^1*yO24^1; k(3)*(0.8^2)*yMEOH4^1*yO24^1; k(4)*(0.8^2)*yMEOH4^1.0*yO24^1; ]; |
2樓2015-09-08 10:43:48
你的CEO
鐵蟲 (小有名氣)
- 應(yīng)助: 2 (幼兒園)
- 金幣: 175.6
- 帖子: 71
- 在線: 18小時(shí)
- 蟲號(hào): 3071920
- 注冊(cè): 2014-03-19
- 性別: GG
- 專業(yè): 能源化工
3樓2015-09-08 10:45:03
 |
4樓2015-09-11 07:55:46
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 你的CEO 的主題更新
| 4 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 303求調(diào)劑 +7 | DLkz1314. 2026-03-30 | 7/350 |
|
|---|---|---|---|---|
|
[考研] 0703化學(xué) +14 | 妮妮ninicgb 2026-03-27 | 14/700 |
|
|
|
[考研] 一志愿河北工業(yè)大學(xué)0817化工278分求調(diào)劑 +14 | jhybd 2026-03-23 | 19/950 |
|
|
|
[考研] 290求調(diào)劑 +3 | dfffsar 2026-03-29 | 3/150 |
|
|
|
[考研] 一志愿北京工業(yè)大學(xué)，324分求調(diào)劑 +6 | 零八# 2026-03-28 | 6/300 |
|
|
|
[考研]
 一志愿武漢理工，總分321，英一數(shù)二，求老師收留。
+11
|
nnnnnnn5 2026-03-25 | 11/550 |
|
|
|
[考研] 環(huán)境工程 085701，267求調(diào)劑 +6 | minht 2026-03-29 | 6/300 |
|
|
|
[考研] 求收留 +5 | 1943443204 2026-03-28 | 5/250 |
|
|
|
[考研] 332求92調(diào)劑 +8 | 蕉蕉123 2026-03-28 | 8/400 |
|
|
|
[考研] 316求調(diào)劑 +7 | 江辭666 2026-03-26 | 7/350 |
|
|
|
[考研] 071000生物學(xué)求調(diào)劑，初試成績(jī)343 +7 | 小小甜面團(tuán) 2026-03-25 | 7/350 |
|
|
|
[考研] 347求調(diào)劑 +3 | 山頂見α 2026-03-25 | 3/150 |
|
|
|
[考研] 339求調(diào)劑，想調(diào)回江蘇 +6 | 烤麥芽 2026-03-27 | 8/400 |
|
|
|
[考研] 352分 化工與材料 +5 | 海納百川Ly 2026-03-27 | 5/250 |
|
|
|
[考研] 085601 材料工程 313分 求調(diào)劑 +5 | Ong3 2026-03-27 | 5/250 |
|
|
|
[考研] 315調(diào)劑 +4 | 0860求調(diào)劑 2026-03-26 | 5/250 |
|
|
|
[考研] 341求調(diào)劑 +7 | 青檸檬1 2026-03-26 | 7/350 |
|
|
|
[考研] 一志愿南航材料專317分求調(diào)劑 +5 | 炸呀炸呀炸薯?xiàng)l 2026-03-23 | 5/250 |
|
|
|
[考研] 292求調(diào)劑 +4 | 鵝鵝鵝額額額額?/a> 2026-03-24 | 4/200 |
|
|
|
[考研] 344求調(diào)劑 +3 | desto 2026-03-24 | 3/150 |
|