24小时热门版块排行榜    

Znn3bq.jpeg
查看: 1361  |  回复: 2

嫰寒锁梦

新虫 (初入文坛)

[求助] Matlab拟合反应动力学参数结果偏差很大啊,求大神指点程序当如何修改 已有1人参与

最近一直在拟合反应动力学参数,花了很大功夫试着编好了代码,却始终不能得出文献中的参数结果,求大神帮忙指点一下程序。在此拜谢了。
code:
function KineticsEst5
clear all
clc
k0 = [0.5 0.5 0.5 0.5 0.5 0.5];         % 参数初值
lb = [0  0  0  0  0  0];                   % 参数下限
ub = [+inf  +inf  +inf  +inf  +inf  +inf];    % 参数上限
x0 = [4.96 24.43 26.32 17 38.72];
ExpData = ...
[     
0        4.96               24.43        26.32
5        5.635        28.29        30.715
10        6.31          32.15        35.11
15        6.77                34.225        34.98
20        7.23                 36.3        34.85
25        7.065        39.285        33.525
30        6.9                42.27        32.2
35        7.08               45.46        29.7
40        7.26               48.65        27.2
50        8             51.215        24.495
60        8.74               53.78        21.79
75        8.605        58.01        19.12
90        8.47               62.24        16.45
]
yexp = ExpData(:,2:4);                  
% 使用函数fmincon()进行参数估计
[k,fval,flag] = fmincon(@ObjFunc4Fmincon,k0,[],[],[],[],lb,ub,[],[],x0,yexp);
fprintf(\\\'\\\\n使用函数fmincon()估计得到的参数值为:\\\\n\\\')
fprintf(\\\'\\\\tk1 = %.4f\\\\n\\\',k(1))
fprintf(\\\'\\\\tk2 = %.4f\\\\n\\\',k(2))
fprintf(\\\'\\\\tk3 = %.4f\\\\n\\\',k(3))
fprintf(\\\'\\\\tk4 = %.4f\\\\n\\\',k(4))
fprintf(\\\'\\\\tk5 = %.4f\\\\n\\\',k(5))
fprintf(\\\'\\\\tk6 = %.4f\\\\n\\\',k(6))
fprintf(\\\'  The sum of the squares is: %.1e\\\\n\\\\n\\\',fval)
k_fmincon = k;
% 以函数fmincon()估计得到的结果为初值,使用函数lsqnonlin()进行参数估计
k0 = k_fmincon;
[k,resnorm,residual,exitflag,output,lambda,jacobian] = ...
    lsqnonlin(@ObjFunc4LNL,k0,lb,ub,[],x0,yexp);      
ci = nlparci(k,residual,jacobian);
fprintf(\\\'\\\\n\\\\n以fmincon()的结果为初值,使用函数lsqnonlin()估计得到的参数值为:\\\\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(\\\'\\\\tk5 = %.4f ± %.4f\\\\n\\\',k(5),ci(5,2)-k(5))
fprintf(\\\'\\\\tk6 = %.4f ± %.4f\\\\n\\\',k(6),ci(6,2)-k(6))
fprintf(\\\'  The sum of the squares is: %.1e\\\\n\\\\n\\\',resnorm)
% ------------------------------------------------------------------
function f = ObjFunc4Fmincon(k,x0,yexp)
tspan = [0,5,10,15,20,25,30,35,40,50,60,75,90];
[t x] = ode45(@KineticEqs,tspan,x0,[],k);   
y(:,1:3) = x(:,1:3);
f = sum((y(:,1)-yexp(:,1)).^2) + sum((y(:,2)-yexp(:,2)).^2) + sum((y(:,3)-yexp(:,3)).^2);
% ------------------------------------------------------------------
function f = ObjFunc4LNL(k,x0,yexp)
tspan = [0,5,10,15,20,25,30,35,40,50,60,75,90];
[t x] = ode45(@KineticEqs,tspan,x0,[],k);   
y(:,1:3) = x(:,1:3);
f1 = y(:,1) - yexp(:,1);
f2 = y(:,2) - yexp(:,2);
f3 = y(:,3) - yexp(:,3);
f = [f1; f2; f3];
% ------------------------------------------------------------------
function dxdt = KineticEqs(t,x,k)
dxdt =  ...
[ (k(1)*x(1)+k(6)*x(3))
   (k(2)*x(1)+k(5)*x(3))
   (k(3)*x(1)+k(4)*x(2)-(k(5)+k(6))*x(3))
   (-(k(1)+k(2)+k(3))*x(1))
   (-k(4)*x(2))
];
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dingd

铁杆木虫 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
微分方程拟合问题吧,把原微分方程及对应的数据贴出来看看。
2楼2015-10-01 19:12:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

嫰寒锁梦

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by dingd at 2015-10-01 19:12:13
微分方程拟合问题吧,把原微分方程及对应的数据贴出来看看。

PAA就是Asphaltene和Preasphaltene;
M10=17.00;M20=38.72;PAA0=26.32;O0=24.43;G0=4.96
Matlab拟合反应动力学参数结果偏差很大啊,求大神指点程序当如何修改
functions.png


Matlab拟合反应动力学参数结果偏差很大啊,求大神指点程序当如何修改-1
data.png

3楼2015-10-01 20:03:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 嫰寒锁梦 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 291求调剂 +8 关忆北. 2026-04-11 8/400 2026-04-12 09:32 by 逆水乘风
[考研] 求调剂 +11 翩翩一书生 2026-04-09 11/550 2026-04-11 19:57 by 逆水乘风
[考研] 0859,337求调剂 +4 研s. 2026-04-10 4/200 2026-04-11 11:34 by caotw2020
[考研] 087100初试311求调剂 +4 任雅琴 2026-04-09 4/200 2026-04-11 10:33 by zhq0425
[考研] 农业管理302分求调剂 +3 xuening1 2026-04-10 3/150 2026-04-11 10:18 by zhq0425
[考研] 293求调剂 +6 勇远库爱314 2026-04-08 6/300 2026-04-11 10:08 by zhq0425
[考研] 085402通信工程调剂,有4项学科竞赛国奖(电赛国二),硕士研究生调剂自荐信。 +5 m永o不v言o弃m 2026-04-09 5/250 2026-04-11 09:33 by zhq0425
[考研] 0854调剂 +4 长弓傲 2026-04-09 4/200 2026-04-11 09:18 by 猪会飞
[考研] 302分求调剂 +9 凡语祈愿 2026-04-08 10/500 2026-04-10 23:26 by 314126402
[考研] 22408 366分,本科211,一志愿西工大 +4 Rubt 2026-04-09 4/200 2026-04-10 19:51 by chemisry
[基金申请] 有爆料,一个青年教师卖房得400万,然后换了一个四青帽子 +9 babu2015 2026-04-08 9/450 2026-04-10 11:43 by 苏东坡二世
[考研] 生物学求调剂 一志愿沪9,326分 +7 刘墨墨 2026-04-06 7/350 2026-04-10 08:11 by kangsm
[考研] 求调剂材料科学与工程一志愿985初试365分 +5 材化李可 2026-04-08 5/250 2026-04-09 17:00 by Lilly_Li
[考研] 334求调剂 +16 Riot2025 2026-04-08 17/850 2026-04-09 09:28 by wdyheheeh
[考研] 一志愿985初试354分生物调剂 +3 031001 2026-04-06 3/150 2026-04-09 00:30 by Evan_Liu
[考研] 求调剂,现在还能填的 +3 上岸小莹加油 2026-04-08 3/150 2026-04-08 14:30 by zhq0425
[考研] 338求调剂 +8 wxygxsaaaaa 2026-04-06 8/400 2026-04-08 06:58 by 无际的草原
[考研] 316求调剂 +4 15318418673 2026-04-07 4/200 2026-04-07 22:12 by hemengdong
[考研] 一志愿太原理工大学计算机技术专硕348,求调剂指导 +3 nexious 2026-04-05 3/150 2026-04-07 08:19 by jp9609
[考研] 327求调剂 +4 拾光任染 2026-04-05 4/200 2026-04-05 20:16 by 南航~万老师
信息提示
请填处理意见