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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 计算模拟 » 程序代码 » 怎样同时拟合三条曲线，得到一套参数
71/1返回列表
查看: 1815  |  回复: 6
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

tobetheone

银虫 (小有名气)

[求助] 怎样同时拟合三条曲线，得到一套参数 已有1人参与

各位大侠，小弟由于研究需要，要进行参数估计，遇到了一个难题：怎样把涉及到2条曲线的同一组参数估计出来，请各位大侠鼎力相助。
据我所知，1stopt可以很方便实现这个功能，但是目前手上没有正版软件，实现不了计算功能，特将代码贴此如下：
Variables x,y1,y2,y3;
Parameters p1,p2,p3,p4,p5,p6;
SharedModel;
Function  y1=p1*exp(-1/2.6*x)+p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)+p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x);
y2=-1/2*(-5658500*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5*p4-108250*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)-95745393*p6^2*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5-95745393*p6^2*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5+108250*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)+102621*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)-100997250*p6^2*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4-102621*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)-108309*p5*p4*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)-9368500*p6*p5*p4*p1*exp(-1/2.6*x)-2668146*p5^2*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)+103595250*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4^2+103651713*p5*p4^2*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)-102621000*p5^2*p6*p1*exp(-1/2.6*x)+103595250*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4^2-100997250*p6^2*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4-2816034*p5^2*p4*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)-2816034*p5^2*p4*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)-2668146*p5^2*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)-108309000*p5^2*p4*p1*exp(-1/2.6*x)+93744500*p5*p6^2*p1*exp(-1/2.6*x)+103651713*p5*p4^2*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)-5658500*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5*p4+98940500*p4*p6^2*p1*exp(-1/2.6*x)+108309*p5*p4*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))/(-433*p6+474*p5)/(102621*p6*p5+108309*p5*p4+108250*p4*p6);
y3=1/2*(-14483906*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5*p4-108250*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)-6875607*p6^2*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5-6875607*p6^2*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5+108250*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)+102621*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)-7252750*p6^2*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4-102621*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)-108309*p5*p4*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2)+10250000*p6*p5*p4*p1*exp(-1/2.6*x)-99952854*p5^2*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)+103595250*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4^2+103651713*p5*p4^2*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)+112338000*p5^2*p6*p1*exp(-1/2.6*x)+103595250*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4^2-7252750*p6^2*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p4-105492966*p5^2*p4*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)-105492966*p5^2*p4*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)-99952854*p5^2*p6*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)+118500000*p5^2*p4*p1*exp(-1/2.6*x)-102621000*p5*p6^2*p1*exp(-1/2.6*x)+103651713*p5*p4^2*p2*exp(-1/1000*(933*p6+957*p4+1000*1/2.6+974*p5-(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)-14483906*p6*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*p5*p4-108250000*p4*p6^2*p1*exp(-1/2.6*x)+108309*p5*p4*p3*exp((-933/1000*p6-957/1000*p4-1/2.6-487/500*p5-1/1000*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))*x)*(870489*p6^2-994238*p4*p6-817484*p6*p5+915849*p4^2-916236*p5*p4+948676*p5^2)^(1/2))/(-433*p6+474*p5)/(102621*p6*p5+108309*p5*p4+108250*p4*p6);
Data;
0        6.1616        10.767        3.704
0.05        5.8161        10.003        3.5127
0.1        5.5093        9.2265        3.158
0.15        5.0878        8.3416        2.8289
0.2        4.2967        7.0175        2.2858
0.25        3.7063        6.425        2.0596
0.3        3.3479        5.7608        1.7427
0.35        2.921        5.083        1.4903
0.4        2.6975        4.7799        1.5039
0.5        2.2055        4.1941        1.3195
0.6        1.916        3.6889        1.1094
0.7        1.5855        3.1527        0.96846
0.8        1.5025        3.0746        0.95926
0.9        1.3666        2.7722        0.88038
1.1        1.3352        2.5721        0.83152
1.3        1.1575        2.3093        0.66482
1.5        1.2741        2.5158        0.75388
1.7        1.2544        2.3014        0.59305
1.9        1.0744        2.0033        0.53928
2.2        0.95854        1.7051        0.4712
2.5        0.82586        1.4852        0.41313
2.8        0.7686        1.2639        0.34796
3.1        0.60757        1.1147        0.26026
3.9        0.54272        0.8547        0.21022
4.9        0.30678        0.5852        0.1671
方程比较长，我试过单独一条拟合是可以在1stopt拟合的，烦请各位大神帮我代算或者给些建议呗？
2.matlab也可以实现相关功能，但是比较复杂，能不能给些建议谢谢
回复此楼

» 猜你喜欢
一个寻找理想的人
1楼 2018-03-30 16:03:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lipenggg

专家顾问 (正式写手)

【答案】应助回帖

感谢参与，应助指数 +1
内容已删除
赞一下 回复此楼
一团和气
2楼2018-03-30 19:18:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhswee

铁杆木虫 (著名写手)
★
月只蓝: 金币+1, 鼓励交流 2018-03-31 08:00:30
这么长的公式，意义何在啊？

发自小木虫IOS客户端
赞一下 回复此楼
3楼2018-03-30 19:49:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lipenggg

专家顾问 (正式写手)

【答案】应助回帖

★
月只蓝: 金币+1, 鼓励交流 2018-03-31 08:00:12
不含自变量的可以简化，这样公式能简单一点。

[ 发自手机版 http://muchong.com/3g ]
赞一下 回复此楼
一团和气
4楼2018-03-30 23:52:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lipenggg

专家顾问 (正式写手)

【答案】应助回帖

如果单独可以拟合，那么代码没问题。共享参数拟合网上的1stopt1.5版本做不了共享参数拟合，所以需要正版软件。

[ 发自手机版 http://muchong.com/3g ]
赞一下 回复此楼
一团和气
5楼2018-03-31 07:47:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tobetheone

银虫 (小有名气)
引用回帖:
3楼: Originally posted by zhswee at 2018-03-30 19:49:15
这么长的公式，意义何在啊？

谢谢，已通过matlab实现
赞一下 回复此楼
一个寻找理想的人
6楼2018-03-31 16:51:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tobetheone

银虫 (小有名气)
引用回帖:
5楼: Originally posted by lipenggg at 2018-03-31 07:47:20
如果单独可以拟合，那么代码没问题。共享参数拟合网上的1stopt1.5版本做不了共享参数拟合，所以需要正版软件。

谢谢，已通过matlab实现
赞一下 回复此楼
一个寻找理想的人
7楼2018-03-31 16:52:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 tobetheone 的主题更新
71/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] O(∩_∩)O +5 jk31rb6vyz 2026-06-12 7/350 2026-06-13 18:45 by lkmi35jdzt
[公派出国] π_π +4 m584r2z4j3 2026-06-11 4/200 2026-06-13 18:33 by lkmi35jdzt
[文学芳草园] 咸菜 +3 myrtle 2026-06-10 3/150 2026-06-13 18:29 by ahsoarli
[公派出国] 售SCI文章，我:8.O.551O.5.4,科目齐全,可十急 +3 i7b870kxb0 2026-06-12 4/200 2026-06-13 16:07 by 999yhm2znn
[教师之家] 售SCI文章，我:8.O.551O.5.4,科目齐全,可十急 +3 i7b870kxb0 2026-06-12 3/150 2026-06-13 15:50 by 999yhm2znn
[考博] 售SCI文章，我:8.O.5.51O.5.4,科目齐全,可十急 +4 uaz7enpl3v 2026-06-12 4/200 2026-06-13 15:25 by 999yhm2znn
[考研] ╭(╯ε╰)╮ +4 m584r2z4j3 2026-06-11 4/200 2026-06-13 14:22 by 80j16ujcu8
[硕博家园] T^T +5 m584r2z4j3 2026-06-11 6/300 2026-06-13 14:07 by gv4vbdygbz
[硕博家园] 售SCI文章，我:8.O.5.51O.5.4,科目齐全,可十急 +3 iatmx9xeph 2026-06-12 4/200 2026-06-13 13:22 by 80j16ujcu8
[考博] T^T +4 jk31rb6vyz 2026-06-12 4/200 2026-06-13 12:09 by 80j16ujcu8
[教师之家] 售SCI文章，我:8.O.5.51O.5.4,科目齐全,可十急 +3 uaz7enpl3v 2026-06-12 4/200 2026-06-13 09:59 by ZYNi吖
[找工作] 售SCI文章，我:8.O.5.51O.5.4,科目齐全,可十急 +4 q1zg6x4lf3 2026-06-12 4/200 2026-06-13 08:53 by t4hz8376wy
[考博] →_→ +3 q1zg6x4lf3 2026-06-12 3/150 2026-06-13 08:49 by t4hz8376wy
[找工作] *囍 +3 m584r2z4j3 2026-06-12 3/150 2026-06-13 08:29 by t4hz8376wy
[论文投稿] →_→ +5 m584r2z4j3 2026-06-11 5/250 2026-06-13 08:13 by t4hz8376wy
[硕博家园] 售SCI文章，我:8.O.5.51O.5.4,科目齐全,可十急 +3 x2l6xoh0i3 2026-06-12 3/150 2026-06-13 06:24 by fjz4noejhx
[硕博家园] 售SCI文章，我:8.O.5.51O.5.4,科目齐全,可十急 +3 iatmx9xeph 2026-06-12 3/150 2026-06-13 05:27 by fjz4noejhx
[基金申请] 前几天时间戳更新了 +8 vito刘 2026-06-11 13/650 2026-06-12 14:17 by BlakeReary
[教师之家] AASSDDFF +3 m584r2z4j3 2026-06-11 3/150 2026-06-12 11:28 by zs48m4lz8g
[考博] 博士申请 +3 张城斐 2026-06-07 3/150 2026-06-08 09:15 by A大朋同学
信息提示
关闭
请填处理意见
关闭