24小时热门版块排行榜    

查看: 947  |  回复: 1

benling1025

捐助贵宾 (初入文坛)

[求助] 求助修改该matlab拟合带参数的时滞微分方程程序

clear all
clc
tspan = [2 4 6 8 10 12 15 20 25 30 35 40 50 60 80 100 120 140 160 180];
x0=[300; 410];
k0 = [1 1 1 1 1 1 1 1]*1e-2;   
lb = [0 0 0 0 0 0 0 0 0 0];
ub = [1 1 1 1 1 1 1 1 1 1]*1e5;

data=...
[
2  238  410
4  224  408
6  211  315
8  202  294
10  198  243
12  190  322
15  177  282
20  160  247
25  151  253
30  135  241
40  123  209
50  111  173
60  99  121
80  85  118
100  74  47
120  88  44
140  80  60
160  77  63
180  83  58
];
yexp = data(:,2:3);
[b,resnorm,residual,exitflag,output,lambda,jacobian] = lsqnonlin(@ObjFunc,k0,lb,ub,[],tspan,yexp);


function f = ObjFunc(b,tspan,yexp)           % 目标函数
sol=dde23(@ddefun,[20],@ddehist,tspan);          % 20是时滞
f = [(ysim(:,1)-yexp(:,1)) (ysim(:,2)-yexp(:,2))];



function dydt=ddefun(t,y,Z)            % dde函数
ylag1=Z(:,1);
dGdt=-b(1)*y(1)-(b(4)*b(8)*y(1)*y(2))/(y(1)+b(8))+b(7);
dIdt=-b(2)*y(2)+b(6)*ylag1(1)
dydt=[dGdt; dIdt];


function S=ddehist(t)        % 初始值
S=[300;410];


这段程序是我根据论坛上类似的ode45的帖子中的程序段改编的,但是不知道为什么函数换成了dde23就没法跑起来了,求高手指点!
回复此楼

» 猜你喜欢

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

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

尘年墨客

新虫 (初入文坛)

朋友您好,我最近在做时滞微分方程参数估计时也遇到了跟你一样的问题,把ode45改成dde23后就是运行不了,不知道您最终解决了这一问题没有?如果解决了的话,不知道可否不吝赐教一下,谢谢您!
2楼2015-06-12 16:27:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 benling1025 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 什么时候出结果,有咨询渠道??? +3 Tide man 2026-08-11 3/150 2026-08-11 17:54 by kudofaye
[基金申请] 小木虫上这么多卖论文的,真有人买论文么?感觉没必要啊 +7 Tide man 2026-08-10 8/400 2026-08-11 15:49 by 铁帽子农民
[基金申请] 分享一下我之前已中青C的计划书的filecode +3 布布和一二 2026-08-11 4/200 2026-08-11 15:20 by aasahr
[论文投稿] 职称评审,求友友推荐见刊最快的期刊 +3 工厂打螺丝 2026-08-08 3/150 2026-08-11 13:42 by 会议编辑
[基金申请] 听说今天filecode变了 +26 布布和一二 2026-08-06 49/2450 2026-08-11 13:18 by WH3796
[基金申请] 我的国基提前知道中了,可是同事的操作让我实在接受不了,怎么会有这样的人 +8 家与远方 2026-08-10 13/650 2026-08-11 09:49 by 家与远方
[基金申请] 关于代码变化问题,想知道的进来 +17 且听虎啸 2026-08-07 24/1200 2026-08-10 18:35 by zhangduo2008
[基金申请] 静等基金结果 +5 gjjjzhong 2026-08-10 16/800 2026-08-10 17:19 by Tide man
[基金申请] 关于Filecode分析方法 +3 majunge000 2026-08-10 3/150 2026-08-10 15:46 by lch2012
[基金申请] 国自然结果 +4 Vierhys 2026-08-10 8/400 2026-08-10 15:06 by Vierhys
[基金申请] 据悉今年马上要出结果了 +7 瞬息宇宙 2026-08-10 8/400 2026-08-10 12:42 by Vivilian
[基金申请] 这样的filecode谁见过 +11 布布和一二 2026-08-08 22/1100 2026-08-10 11:10 by wmfsnow
[基金申请] 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
[基金申请] 国基金的申报应该改成非等额制,评价高的钱多评价低的钱少,但是增加资助率 +7 a089 2026-08-07 7/350 2026-08-08 18:05 by gltch
[基金申请] 固定端突然变了,今天 +6 archvillain 2026-08-06 10/500 2026-08-07 16:03 by 医学老男孩
[基金申请] filecode +14 等待解的谜 2026-08-06 19/950 2026-08-07 12:20 by wlwhappy
[基金申请] filecode +8 布布和一二 2026-08-06 11/550 2026-08-06 20:41 by tangpu318
[基金申请] 影响面上的因素 +8 布布和一二 2026-08-05 11/550 2026-08-06 10:41 by 宝贝虫子
信息提示
请填处理意见