24小时热门版块排行榜    

查看: 1811  |  回复: 10

水中的梦88

木虫 (正式写手)

[求助] 微分方程拟合求参数问题 已有1人参与

最近需要做微分方程拟合求参数的问题,但是以前并没有用过Matlab,只是学过C语言,研究了一段时间了。
照葫芦画瓢,但是始终都弄不出来。求各位大神帮忙,需要代码。我可以再根据代码继续研究。
跪求啊!
下面是我自己弄的。再这个的基础上希望能够算出相关系数。
format long
clear all
clc
tspan = [0 7 14 28 56 90 180];
x0 = 0.353542884;
k0 = 1e-3;   
lb = 1e-5;
ub = 1;

yexp =

[0.353542884 0.355002172 0.372553224 0.377598226 0.39054644 0.403335059 0.420130491];

[k,resnorm,residual,exitflag,output,lambda,jacobian] = ...
    lsqnonlin(@ObjFunc,k0,lb,ub,[],tspan,x0,yexp);      
ci = nlparci(k,residual,jacobian);
fprintf('\n\n使用函数lsqnonlin()估计得到的参数值为:\n')
fprintf('\tk1 = %.6e\n',k)

fprintf('  The sum of the squares is: %.6e\n\n',resnorm)

function f = ObjFunc(k,tspan,x0,yexp)           % 目标函数
[t Xsim] = ode45(@KineticsEqs,tspan,x0,[],k);
ysim = Xsim(2:end);
f = ysim-yexp;

function dAdt = KineticsEqs(t,A,k)              % ODE模型方程
dAdt=k*3*(1-A)^(2/3)/(2-2*(1-A)^(1/3));
回复此楼

» 猜你喜欢

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

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

月只蓝

主管区长 (职业作家)

【答案】应助回帖

引用回帖:
6楼: Originally posted by 水中的梦88 at 2015-10-07 14:30:02
您用的是哪个版本的1stopt,我也试试,看能不能找到软件。...

http://muchong.com/bbs/viewthread.php?tid=8050245
MATLAB、MS小问题、普通问题请发帖求助!时间精力有限,恕不接受无偿私信求助。
7楼2015-10-07 16:05:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

水中的梦88

木虫 (正式写手)

顶顶!大神快来帮忙啊!跪谢!
2楼2015-10-07 09:15:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

这里有颗瓜

铁虫 (小有名气)

急不急,不急晚上回去弄?

发自小木虫Android客户端

» 本帖已获得的红花(最新10朵)

3楼2015-10-07 09:39:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

月只蓝

主管区长 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
用1stopt计算,代码和结果如下:
代码:
Variables t,y;
OdeFunction y'=k*3*(1-y)^(2/3)/(2-2*(1-y)^(1/3));
Data;

         0    0.3535
    7.0000    0.3550
   14.0000    0.3726
   28.0000    0.3776
   56.0000    0.3905
   90.0000    0.4033
  180.0000    0.4201

结果:

Root of Mean Square Error (RMSE): 0.00878112685716906
Residual Sum of Squares (SSE): 0.000539757322171871
Correlation Coef. (R): 0.990208373887058
R-Square: 0.980512623716052
Determination Coef. (DC): 0.974279082009332
Parameters Best Estimate
-------------------- -------------k 6.18772301033453E-5
====== Output Results =====
File: Data file - 1
No Obs. y Cal. y
1 0.355 0.357062297934808
2 0.3726 0.360570784579331
3 0.3776 0.367433567235337
4 0.3905 0.380587817889355
5 0.4033 0.3956451569869
6 0.4201 0.431527943596942

» 本帖已获得的红花(最新10朵)

MATLAB、MS小问题、普通问题请发帖求助!时间精力有限,恕不接受无偿私信求助。
4楼2015-10-07 10:14:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

水中的梦88

木虫 (正式写手)

送红花一朵
引用回帖:
4楼: Originally posted by 月只蓝 at 2015-10-07 10:14:39
用1stopt计算,代码和结果如下:
代码:
Variables t,y;
OdeFunction y'=k*3*(1-y)^(2/3)/(2-2*(1-y)^(1/3));
Data;

         0    0.3535
    7.0000    0.3550
   14.0000    0.3726
   28.0000    0. ...

谢谢大神!但是我没有这个软件,只能用Matlab,还有很多类似的需要拟合。
5楼2015-10-07 14:28:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

水中的梦88

木虫 (正式写手)

引用回帖:
4楼: Originally posted by 月只蓝 at 2015-10-07 10:14:39
用1stopt计算,代码和结果如下:
代码:
Variables t,y;
OdeFunction y'=k*3*(1-y)^(2/3)/(2-2*(1-y)^(1/3));
Data;

         0    0.3535
    7.0000    0.3550
   14.0000    0.3726
   28.0000    0. ...

您用的是哪个版本的1stopt,我也试试,看能不能找到软件。
6楼2015-10-07 14:30:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

水中的梦88

木虫 (正式写手)

引用回帖:
7楼: Originally posted by 月只蓝 at 2015-10-07 16:05:01
http://muchong.com/bbs/viewthread.php?tid=8050245...

谢谢!
8楼2015-10-08 08:29:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

水中的梦88

木虫 (正式写手)

送红花一朵
引用回帖:
3楼: Originally posted by 这里有颗瓜 at 2015-10-07 09:39:17
急不急,不急晚上回去弄?

不是很急,谢谢谢谢!
9楼2015-10-08 08:29:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

水中的梦88

木虫 (正式写手)

再顶顶!求各位大神帮忙!
10楼2015-10-09 16:47:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 水中的梦88 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 据悉今年马上要出结果了 +5 瞬息宇宙 2026-08-10 6/300 2026-08-10 10:38 by Tide man
[基金申请] 应该是93bebmhtak前后十一个字符比较关键 +9 Lanmanbaby 2026-08-09 17/850 2026-08-10 10:35 by Tide man
[基金申请] 2026国自然放榜时间 +7 布布和一二 2026-08-08 7/350 2026-08-10 10:26 by allmydream
[基金申请] 综述论文作为代表作会不会影响评审专家的印象分? +7 yufeiwaner 2026-08-09 7/350 2026-08-10 09:08 by zju2000
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
[基金申请] filecode与中标关系的预测 +5 布布和一二 2026-08-07 5/250 2026-08-09 16:15 by 袁向阳007
[基金申请] fileCode有新解读? +10 Tide man 2026-08-08 18/900 2026-08-09 12:55 by 仁砚薪传
[基金申请] 关于filecode,很负责任的告诉大家 +6 爱看书的可乐 2026-08-08 7/350 2026-08-08 22:13 by a_niu
[基金申请] 关于豆爷回答的JTJC与%2F数量 +5 yang182083 2026-08-06 7/350 2026-08-08 18:29 by zhanghaozhu
[基金申请] 国基金的申报应该改成非等额制,评价高的钱多评价低的钱少,但是增加资助率 +7 a089 2026-08-07 7/350 2026-08-08 18:05 by gltch
[基金申请] 娱乐 +6 Tide man 2026-08-03 6/300 2026-08-07 22:40 by 铁帽子农民
[基金申请] 听说今天filecode变了 +24 布布和一二 2026-08-06 47/2350 2026-08-07 16:02 by zhiyanjiang
[基金申请] filecode变化情况 +6 布布和一二 2026-08-07 22/1100 2026-08-07 14:45 by 且听虎啸
[基金申请] 大家散了吧,后缀研究没有意义,别浪费时间了,过好目前的每一天,不要焦虑 +5 Tide man 2026-08-06 7/350 2026-08-07 13:11 by 医学老男孩
[基金申请] 求各位大神看下 100+6 hpkpkpkp 2026-08-05 33/1650 2026-08-06 14:49 by zhiyanjiang
[基金申请] 影响面上的因素 +8 布布和一二 2026-08-05 11/550 2026-08-06 10:41 by 宝贝虫子
[基金申请] 8月时间戳变的,举个手。玩一下,释放压力 +9 archvillain 2026-08-04 11/550 2026-08-05 20:06 by wlwhappy
[基金申请] 好消息?这个有何含义??? +8 Tide man 2026-08-05 10/500 2026-08-05 16:14 by xmuxiaoyu
[基金申请] 纯娱乐,不喜欢勿喷 +7 Tide man 2026-08-04 10/500 2026-08-04 15:10 by loufangrui
[基金申请] 什么时候能放榜呀? +3 Jacob678 2026-08-03 3/150 2026-08-03 16:14 by gltch
信息提示
请填处理意见