24小时热门版块排行榜    

查看: 1675  |  回复: 6
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

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也可以实现相关功能,但是比较复杂,能不能给些建议谢谢
回复此楼
一个寻找理想的人
已阅   回复此楼   关注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的回帖
查看全部 7 个回答

zhswee

铁杆木虫 (著名写手)


月只蓝: 金币+1, 鼓励交流 2018-03-31 08:00:30
这么长的公式,意义何在啊?

发自小木虫IOS客户端
3楼2018-03-30 19:49:15
已阅   回复此楼   关注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的回帖
信息提示
请填处理意见