应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 计算模拟 » matlab如何编写共享参数拟合程序
91/1返回列表
查看: 2491  |  回复: 8
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

zyugiec

金虫 (正式写手)

[求助] matlab如何编写共享参数拟合程序

请问如何用matlab软件编写共享参数拟合（两个函数拟合的参数值要相同），同时还要求限定参数大于0
以下是用1stopt软件编写的，但由于要1.5以上版本才能运行共享参数模型，故只能放弃，想改用matlab软件运行。有没有哪位虫子知道？望能告之，非常感谢！悬赏20金币，聊表谢意！

Parameter k1[0,],k2[0,],k3[0,];
SharedModel;
Variable t,M,G;
Function M=50*k1/(k3-(k1+k2))*(exp(-(k1+k2)*t)-exp(-k3*t)); G=50-M-50*exp(-(k1+k2)*t);
Data;
0        0        0
3        2.288        4.035
7        2.236        6.097
12        2.283        7.961
24        2.26        10.426
30        2.273        11.295
36        2.315        12.35
48        2.25        13.201
60        2.276        14.576
72        2.317        15.043
回复此楼

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

大杂烩 film

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2012-04-14 22:02:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

★ ★ ★
感谢参与，应助指数 +1
cenwanglai: 金币+3, 谢谢回复~ 2012-04-15 17:57:16
A=[3        2.288        4.035
7        2.236        6.097
12        2.283        7.961
24        2.26        10.426
30        2.273        11.295
36        2.315        12.35
48        2.25        13.201
60        2.276        14.576
72        2.317        15.043];
t=A(:,1);y1=A(:,2);y2=A(:,3);
F=@(k,t)[50*k(1)/(k(3)-(k(1)+k(2)))*(exp(-(k(1)+k(2))*t)-exp(-k(3)*t)); 50-...
    (50*k(1)/(k(3)-(k(1)+k(2)))*(exp(-(k(1)+k(2))*t)-exp(-k(3)*t)))-50*exp(-(k(1)+k(2))*t)];
[X,RESNORM,RESIDUAL,EXITFLAG,OUTPUT,LAMBDA] = lsqcurvefit(F, [1.22 0.08 3.05], t,[y1;y2],[0 0 0],[],[])
赞一下 回复此楼

» 本帖已获得的红花（最新10朵）

zyugiec
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
2楼2012-04-15 09:44:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★
zyugiec: 金币+10, ★有帮助 2012-04-16 13:25:19
初值可能不太合适，你根据经验调一下。
赞一下 回复此楼
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
3楼2012-04-15 09:45:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyugiec

金虫 (正式写手)
送鲜花一朵
引用回帖:
2楼: Originally posted by dbb627 at 2012-04-15 09:44:04:
A=;
t=A(:,1);y1=A(:,2);y2=A(:,3);
F=@(k,t);
= lsqcurvefit(F, , t,,,[],[])

初始值在哪改？ 是改这3个吗？[1.22 0.08 3.05]？？
还有如何看拟合值？谢谢！
赞一下 回复此楼
4楼2012-04-16 13:24:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyugiec

金虫 (正式写手)
引用回帖:
3楼: Originally posted by dbb627 at 2012-04-15 09:45:34:
初值可能不太合适，你根据经验调一下。

如何限定初始值范围，我要求大于0
赞一下 回复此楼
5楼2012-04-16 13:33:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

[X,RESNORM,RESIDUAL,EXITFLAG,OUTPUT,LAMBDA] = lsqcurvefit(F, [1.22 0.08 3.05], t,[y1;y2],[0 0 0],[],[])
X,k的拟合值
[1.22 0.08 3.05]初值
[0 0 0]限定初始值范围，大于0
赞一下(1人) 回复此楼

» 本帖已获得的红花（最新10朵）

zyugiec zyugiec
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
6楼2012-04-16 14:24:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyugiec

金虫 (正式写手)
送鲜花一朵
引用回帖:
6楼: Originally posted by dbb627 at 2012-04-16 14:24:58:
= lsqcurvefit(F, , t,,,[],[])
X,k的拟合值
初值
限定初始值范围，大于0

如何看拟合后的y1和y2值？
赞一下 回复此楼
7楼2012-04-16 15:19:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

★
zhangguangping: 金币+1, 谢谢 2012-04-16 20:36:53
>> Y=F(X,t)
>> plot(t,y1,'ro',t,y2,'b*')
>> hold on;

>> plot(t,Y(1:length(t)),'r>-',t,Y(length(t)+1:end),'b<-')%拟合后的
赞一下(1人) 回复此楼
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
8楼2012-04-16 15:28:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyugiec

金虫 (正式写手)
送鲜花一朵
引用回帖:
6楼: Originally posted by dbb627 at 2012-04-16 14:24:58:
= lsqcurvefit(F, , t,,,[],[])
X,k的拟合值
初值
限定初始值范围，大于0

我想进一步限制参数，要求k1>k3>k2，该怎么做？
赞一下 回复此楼
9楼2012-04-17 13:36:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zyugiec 的主题更新
91/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[文学芳草园] 厉娜 +3 张丹枫1991 2026-11-09 5/250 2026-11-09 16:53 by 张丹枫1991
[考博] 售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急 +5 kvewwGtKktqB 2026-11-04 12/600 2026-11-09 13:26 by Equinoxhua
[考研] 售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急 +5 ttH3f1oA6ace 2026-11-04 15/750 2026-11-09 13:19 by Equinoxhua
[硕博家园] 售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急 +5 5sJFDKp2kwuI 2026-11-06 16/800 2026-11-09 11:47 by GwrQVVR6Oenx
[考博] 售SCI文章，我:8O.5.5.1O.54,科目全,可十急 +5 5sJFDKp2kwuI 2026-11-06 15/750 2026-11-09 11:41 by GwrQVVR6Oenx
[硕博家园] 售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急 +4 5sJFDKp2kwuI 2026-11-06 10/500 2026-11-09 08:00 by IhnEQauGmT3K
[考研] 售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急 +3 5sJFDKp2kwuI 2026-11-06 12/600 2026-11-09 06:32 by l48hFd8Nwae2
[公派出国] 售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急 +4 5sJFDKp2kwuI 2026-11-06 8/400 2026-11-09 00:14 by l48hFd8Nwae2
[教师之家] 售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急 +4 5sJFDKp2kwuI 2026-11-06 8/400 2026-11-08 23:01 by l48hFd8Nwae2
[教师之家] 售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急 +5 5sJFDKp2kwuI 2026-11-06 9/450 2026-11-08 22:46 by l48hFd8Nwae2
[教师之家] 延安大学回应“副教授留绝笔信”：确已离世，正核实举报内容 +3 yexuqing 2026-11-04 5/250 2026-11-07 13:22 by 苏东坡二世
[公派出国] 售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急 +5 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 16:12 by 5sJFDKp2kwuI
[公派出国] 售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急 +6 ttH3f1oA6ace 2026-11-04 12/600 2026-11-06 16:10 by 5sJFDKp2kwuI
[硕博家园] 售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急 +4 ttH3f1oA6ace 2026-11-04 11/550 2026-11-06 16:10 by 5sJFDKp2kwuI
[公派出国] 售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急 +5 kvewwGtKktqB 2026-11-04 14/700 2026-11-06 05:10 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章，我:8O.55.1.O.5.4,科目齐全,可+急 +6 kvewwGtKktqB 2026-11-04 16/800 2026-11-06 05:00 by qL1cU46YIdK0
[考博] 售一区SCI文章T0P，我:8O.551.O54,科目全,可十急 +4 ttH3f1oA6ace 2026-11-04 7/350 2026-11-06 02:13 by qL1cU46YIdK0
[考研] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +4 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 02:04 by qL1cU46YIdK0
[硕博家园] 售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急 +3 ttH3f1oA6ace 2026-11-04 9/450 2026-11-06 02:02 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +4 hNpp4Y2CGvSC 2026-11-04 12/600 2026-11-06 01:53 by qL1cU46YIdK0
信息提示
关闭
请填处理意见
关闭