24小时热门版块排行榜    

Znn3bq.jpeg
查看: 3908  |  回复: 14
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

楚天湘水

金虫 (小有名气)

[求助] matlab 拟合反应动力学参数结果很差。大家帮忙看一下

已知动力学模型为:
dA1dt = r1 + r2;
dA2dt =  - r1-r2;
dA3dt = -r1;
dA4dt = r1 - r2;
dA5dt = r2;

r1 = k(1)*((a(3)*a(2) - (1/2.20)*a(4)*a(1)));
r2 = k(2)*(a(4)*a(2) -  (1/0.40)*a(5)*a(1)));

已知的参数:
时间:tspan = [0 60 120 180 240 300 360 420 600 1200 6900 7500],
活度系数:KineticsData1
% 动力学数据
%  a1 a2 a3 a4 a5
ExpData=...
    [0.0000         0.8122         0.3894         0.0000         0.0000
     0.1827         0.6353         0.1599         0.2163         0.0444
     0.2547         0.5668         0.0979         0.2485         0.0805
     0.2854         0.5390         0.0788         0.2415         0.1061
     0.2978         0.5258         0.0738         0.2359         0.1192
     0.3019         0.5210         0.0710         0.2309         0.1288
     0.3092         0.5143         0.0691         0.2264         0.1349
     0.3178         0.5062         0.0680         0.2223         0.1349
     0.3178         0.5062         0.0680         0.2186         0.1433
     0.3211         0.5030         0.0674         0.2154         0.1478
     0.3209         0.5036         0.0673         0.2140         0.1482
     0.3205         0.5045         0.0674         0.2136         0.1476 ]

下面是写的matlab程序:
function Kinetic2
% 动力学ODE方程模型的参数估计
clear all
clc

k0 = [900000 50000];         % 参数初值
lb = [0  0];                   % 参数下限
ub = [+inf  +inf ];    % 参数上限
a0 = [0.0000 0.8122 0.3894 0.0000 0.0000];
KineticsData1;
yexp = ExpData(:,1:5);   % yexp: 实验数据[a1 a2 a3 a4 a5]

% 使用函数fmincon()进行参数估计
[k,fval,flag] = fmincon(@ObjFunc4Fmincon,k0,[],[],[],[],lb,ub,[],[],a0,yexp);
fprintf('\n使用函数fmincon()估计得到的参数值为:\n')
fprintf('\tk1 = %.4f\n',k(1))
fprintf('\tk2 = %.4f\n',k(2))
fprintf('  The sum of the squares is: %.1e\n\n',fval)
k_fmincon = k;

% 使用函数lsqnonlin()进行参数估计
[k,resnorm,residual,exitflag,output,lambda,jacobian] = ...
    lsqnonlin(@ObjFunc4LNL,k0,lb,ub,[],a0,yexp);      
ci = nlparci(k,residual,jacobian);
fprintf('\n\n使用函数lsqnonlin()估计得到的参数值为:\n')
fprintf('\tk1 = %.4f\n',k(1))
fprintf('\tk2 = %.4f\n',k(2))
fprintf('  The sum of the squares is: %.1e\n\n',resnorm)
exitflag


% 以函数fmincon()估计得到的结果为初值,使用函数lsqnonlin()进行参数估计
k0 = k_fmincon;
[k,resnorm,residual,exitflag,output,lambda,jacobian] = ...
    lsqnonlin(@ObjFunc4LNL,k0,lb,ub,[1e-15],a0,yexp);      
ci = nlparci(k,residual,jacobian);
fprintf('\n\n以fmincon()的结果为初值,使用函数lsqnonlin()估计得到的参数值为:\n')
fprintf('\tk1 = %.4f\n',k(1))
fprintf('\tk2 = %.4f\n',k(2))
fprintf('  The sum of the squares is: %.1e\n\n',resnorm)
exitflag

function f = ObjFunc4Fmincon(k,a0,yexp)
tspan = [0 60 120 180 240 300 360 420 600 1200 6900 7500];
[t a] = ode23s(@KineticEqs,tspan,a0,[],k);
y(:,1:5) = a(:,1:5);
f = sum(((y(:,1)-yexp(:,1))/0.01).^2) + sum(((y(:,2)-yexp(:,2))/0.01).^2)   ...
    + sum(((y(:,3)-yexp(:,3))/0.005).^2) + sum(((y(:,4)-yexp(:,4))/0.01).^2) ...
    + sum(((y(:,5)-yexp(:,5))/0.01).^2);


function f = ObjFunc4LNL(k,a0,yexp)
tspan = [0 60 120 180 240 300 360 420 600 1200 6900 7500];
[t a] = ode23s(@KineticEqs,tspan,a0,[],k);   
y(:,1:5) = a(:,1:5);
f1 = (y(:,1) - yexp(:,1))/0.01;
f2 = (y(:,2) - yexp(:,2))/0.01;
f3 = (y(:,3) - yexp(:,3))/0.005;
f4 = (y(:,4) - yexp(:,4))/0.01;
f5 = (y(:,5) - yexp(:,5))/0.01;
f = [f1; f2; f3; f4; f5];
plot(tspan,yexp(:,1), 'b^',tspan,yexp(:,2), 'ro',tspan,yexp(:,3),'y*',...
    tspan,yexp(:,4), 'go',tspan,yexp(:,5), 'cs')
hold on
plot(tspan,y(:,1), 'b-',tspan,yexp(:,2), 'r-',tspan,yexp(:,3),'y-', ...
    tspan,yexp(:,4), 'g-',tspan,yexp(:,5), 'c-')
axis([0 800 0 1])

%动力学模型-----------------------------------------------------------------------
function dadt = KineticEqs(t,a ,k)
Keq=[2.20 0.40];
dadt=...
   [((k(1)*(a(3)*a(2)-(1/Keq(1))*a(4)*a(1))) + (k(2)*(a(4)*a(2)-(1/Keq(2))*a(5)*a(1))));
   -((k(1)*(a(3)*a(2)-(1/Keq(1))*a(4)*a(1))) + (k(2)*(a(4)*a(2)-(1/Keq(2))*a(5)*a(1))));
   -(k(1)*(a(3)*a(2)-(1/Keq(1))*a(4)*a(1)));
  ((k(1)*(a(3)*a(2)-(1/Keq(1))*a(4)*a(1))) - (k(2)*(a(4)*a(2)-(1/Keq(2))*a(5)*a(1))));
   (k(2)*(a(4)*a(2)-(1/Keq(2))*a(5)*a(1)))];

大家帮忙看一看,哪里有问题,从做出的图可以看出,处理的结果很差啊。
无论K初值给出怎么样,都是拟合出来的a1和实验值a1相差很远,而其他值都拟合很好。




[ Last edited by 楚天湘水 on 2012-5-1 at 00:44 ]
回复此楼

» 收录本帖的淘帖专辑推荐

动力学拟合

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

feng198800

金虫 (正式写手)

【答案】应助回帖

请问楼主活度系数:KineticsData1
% 动力学数据
%  a1 a2 a3 a4 a5
ExpData=...
    [0.0000         0.8122         0.3894         0.0000         0.0000
     0.1827         0.6353         0.1599         0.2163         0.0444
     0.2547         0.5668         0.0979         0.2485         0.0805
     0.2854         0.5390         0.0788         0.2415         0.1061
     0.2978         0.5258         0.0738         0.2359         0.1192
     0.3019         0.5210         0.0710         0.2309         0.1288
     0.3092         0.5143         0.0691         0.2264         0.1349
     0.3178         0.5062         0.0680         0.2223         0.1349
     0.3178         0.5062         0.0680         0.2186         0.1433
     0.3211         0.5030         0.0674         0.2154         0.1478
     0.3209         0.5036         0.0673         0.2140         0.1482
     0.3205         0.5045         0.0674         0.2136         0.1476 ]

是怎么回事?程序语句中没有体现你输入实验数据!
9楼2012-05-29 10:46:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 15 个回答

dingd

铁杆木虫 (职业作家)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
楚天湘水: 金币+20, 有帮助 2012-06-02 23:38:27
1stOpt计算结果:


2楼2012-05-02 10:22:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

楚天湘水

金虫 (小有名气)

引用回帖:
2楼: Originally posted by dingd at 2012-05-02 10:22:42:
1stOpt计算结果:
ed/e1/291104_1335925306_702.jpg

能不能把代码贴出来啊,
3楼2012-05-02 10:42:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hitzhengwei

木虫 (著名写手)

【答案】应助回帖

感谢参与,应助指数 +1
楼主的拟合代码最好贴出来,不然怎么知道错误;另外,其实可以输出散点数据,然后用Origin来拟合曲线,感觉比matlab的好看很多。
品味人生棋局,聆听世界心灵
4楼2012-05-02 10:57:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 296求调剂 +6 汪!?! 2026-04-09 6/300 2026-04-09 20:49 by lbsjt
[考研] 一志愿双非085400电子信息344 求调剂,对材料和化学方向也感兴趣 +5 无情的小羊 2026-04-09 6/300 2026-04-09 20:37 by ruzee
[考研] 297求调剂 +25 GENJIOW 2026-04-07 28/1400 2026-04-09 18:47 by laoshidan
[考研] 电子信息270求调剂 +11 terminal469 2026-04-07 11/550 2026-04-09 18:28 by hy861222
[考研] 314求调剂 +16 xhhdjdjsjks 2026-04-09 17/850 2026-04-09 18:26 by 喝醉酒N
[考研] 一志愿中国科学院上海有机所,有机化学356分找调剂 +11 Nadiums 2026-04-09 11/550 2026-04-09 18:04 by lijunpoly
[考研] 085500求调剂材料 +4 易11122 2026-04-09 4/200 2026-04-09 17:16 by 1753564080
[考研] 调剂 +12 JLLLLLLLLLL 2026-04-03 12/600 2026-04-09 16:14 by angeltong
[考研] 085801 总分275 本科新能源 求调剂 +8 bradoner 2026-04-08 9/450 2026-04-09 13:43 by only周
[考研] 318求调剂 +5 李青山山山 2026-04-07 5/250 2026-04-07 18:24 by 蓝云思雨
[考研] 0854求调剂 +9 亨氏番茄沙司 2026-04-06 10/500 2026-04-07 14:37 by shdgaomin
[考研] 考研调剂 +7 15615482637 2026-04-04 7/350 2026-04-06 22:56 by chenzhimin
[考研] 346分的生物与医药08600求调剂 +6 常雨阳上岸 2026-04-05 7/350 2026-04-06 12:36 by lys0704
[考研] 求调剂 +7 张.1 2026-04-05 7/350 2026-04-05 20:40 by 啵啵啵0119
[考研] 材料调剂 +13 一样YWY 2026-04-03 14/700 2026-04-05 18:20 by 蓝云思雨
[考研] 295求调剂 +8 FZAC123 2026-04-03 8/400 2026-04-05 17:46 by 蓝云思雨
[考研] 怎么删帖子啊 +3 缝曦1000 2026-04-04 3/150 2026-04-04 14:20 by 土木硕士招生
[考研] 400分求调剂 +3 尴尬且挠头 2026-04-04 3/150 2026-04-04 08:41 by jp9609
[考研] 求调剂 +8 akdhjs 2026-04-03 8/400 2026-04-03 18:17 by 戴维ING
[考研] 考研调剂 +3 Draa 2026-04-03 3/150 2026-04-03 17:37 by hgwz7468
信息提示
请填处理意见