查看: 1122  |  回复: 3

stone924

新虫 (初入文坛)

[求助] 1stOpt函数中含有间接变量怎么办

刚接触1stOpt就遇到了很大的困难:由于函数表达式过于复杂,不得不在其中引入间接变量(如代码中的F11,F12等等),而运行结果却并不是设定的parameter。请高手指点迷津,不胜感激
结果如下:
参数        最佳估算
----------        -------------
x1                 0
x2                 0
x3                 0
rate1              0
rate2              0
rate3              0
r1                 0
r2                 0
r3                 0
rs                 0
代码如下:
Constant K=23.05,u=21.58,c1=4.6948,cs=0.00001,phi=0.1412,pi=3.1415926;
Parameters x1,a1,x2,a2,x3,a3;
Variable p,c;
Function
        x1+x3+x3=phi;

        Ia1=2*pi*a1*(arccos(a1)-a1*(1-a1^2)^0.5)/(1-a1^2)^1.5;
        F11=6*u*Ia1/(2*pi*(3*K+4*u));
        F12=6*u*(3*Ia1-4*pi)/(4*pi*(3*K+4*u));
        F13=a1^2*(3-9*Ia1/(4*pi))*(6*K+2*u)/(2*(1-a1^2)*(3*K+4*u))+(6*u*Ia)/(8*pi*(3*K+4*u));
        F14=0.5*((3-9*Ia1/(4*pi))*(6*K+2*u)/(2*(1-a1^2)*(3*K+4*u))-3*u*(1-Ia1/pi)/(3*K+4*u));
        rate1=-p/(F11-F12*F13/(F13+F14))/K;
        //if rate1 <-1
        //        rate1=-1
        //end

        Ia2=2*pi*a2*(arccos(a2)-a2*(1-a2^2)^0.5)/(1-a2^2)^1.5;
        F21=6*u*Ia2/(2*pi*(3*K+4*u));
        F22=6*u*(3*Ia2-4*pi)/(4*pi*(3*K+4*u));
        F23=a2^2*(3-9*Ia2/(4*pi))*(6*K+2*u)/(2*(1-a2^2)*(3*K+4*u))+(6*u*Ia)/(8*pi*(3*K+4*u));
        F24=0.5*((3-9*Ia2/(4*pi))*(6*K+2*u)/(2*(1-a2^2)*(3*K+4*u))-3*u*(1-Ia2/pi)/(3*K+4*u));
        rate2=-p/(F21-F22*F23/(F23+F24))/K;

        Ia3=2*pi*a3*(arccos(a3)-a3*(1-a3^2)^0.5)/(1-a3^2)^1.5;
        F31=6*u*Ia3/(2*pi*(3*K+4*u));
        F32=6*u*(3*Ia3-4*pi)/(4*pi*(3*K+4*u));
        F33=a3^2*(3-9*Ia3/(4*pi))*(6*K+2*u)/(2*(1-a3^2)*(3*K+4*u))+(6*u*Ia)/(8*pi*(3*K+4*u));
        F34=0.5*((3-9*Ia3/(4*pi))*(6*K+2*u)/(2*(1-a3^2)*(3*K+4*u))-3*u*(1-Ia3/pi)/(3*K+4*u));
        rate3=-p/(F31-F32*F33/(F33+F34))/K;

        L1z=1/(1-(a1*(1+rate1))^2)-(a1*(1+rate1))*arccos((a1*(1+rate1)))/(1-(a1*(1+rate1))^2)^1.5;   
        L1x=(1-L1z)/2;
        L1y=L1x;
        R1=1/9*(1/(L1x*c1+(1-L1x)*c)+1/(L1y*c1+(1-L1y)*c)+1/(L1z*c1+(1-L1z)*c));

        L2z=1/(1-(a2*(1+rate2))^2)-(a2*(1+rate2))*arccos((a2*(1+rate2)))/(1-(a2*(1+rate2))^2)^1.5;   
        L2x=(1-L2z)/2;
        L2y=L2x;
        R2=1/9*(1/(L2x*c1+(1-L2x)*c)+1/(L2y*c1+(1-L2y)*c)+1/(L2z*c1+(1-L2z)*c));

        L3z=1/(1-(a3*(1+rate3))^2)-(a3*(1+rate3))*arccos((a3*(1+rate3)))/(1-(a3*(1+rate3))^2)^1.5;   
        L3x=(1-L3z)/2;
        L3y=L3x;
        R3=1/9*(1/(L3x*c1+(1-L3x)*c)+1/(L3y*c1+(1-L3y)*c)+1/(L3z*c1+(1-L3z)*c));

        Rs=1/9*(1/(1/3*cs+(1-1/3)*c)+1/(1/3*cs+(1-1/3)*c)+1/(1/3*cs+(1-1/3)*c));


(1-(x1*(1+rate1)+x2*(1+rate2)+x3*(1+rate3)))*(cs-c)*Rs+x1*(1+rate1)*(c1-c)*R1+x2*(1+rate2)*(c1-c)*R2+x3*(1+rate3)*(c1-c)*R3=0;

data;
0.008         0.1325
0.115        0.1309
0.020         0.1299
0.026        0.1290
0.040        0.1277
0.060        0.1269
回复此楼

» 猜你喜欢

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

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

feixiaolin

荣誉版主 (文坛精英)

优秀版主

ConstStr  定义中间变量
2楼2014-07-31 16:20:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

stone924

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by feixiaolin at 2014-07-31 16:20:25
ConstStr  定义中间变量

能详细一点吗,太谢谢了
3楼2014-08-07 21:53:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

feixiaolin

荣誉版主 (文坛精英)

优秀版主

引用回帖:
3楼: Originally posted by stone924 at 2014-08-07 21:53:42
能详细一点吗,太谢谢了...

ConstStr F11=6*u*Ia1/(2*pi*(3*K+4*u));
代替
Function  F11=6*u*Ia1/(2*pi*(3*K+4*u));
4楼2014-08-07 21:56:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 stone924 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 课题组会帮你通过考核么? +3 好运来~9527 2026-10-10 6/300 2026-10-12 14:55 by 简单化xn
[有机交流] OpenAI又攻克数学难题了,离AI做有机合成还有多远? +4 wangyl_123 2026-10-10 7/350 2026-10-12 14:47 by chuans0923
[公派出国] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:34 by XQNyDCa1Tk5n
[找工作] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 22:26 by XQNyDCa1Tk5n
[公派出国] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:26 by XQNyDCa1Tk5n
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:15 by XQNyDCa1Tk5n
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 22:11 by XQNyDCa1Tk5n
[教师之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:06 by XQNyDCa1Tk5n
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:06 by XQNyDCa1Tk5n
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 14:25 by VOMexwnDzOFZ
[教师之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 (EPI+-1)(金币-50) +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 14:05 by VOMexwnDzOFZ
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:51 by VOMexwnDzOFZ
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:45 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:54 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:34 by VOMexwnDzOFZ
[考博] 招收博士生一名 +3 mandolin 2026-10-10 3/150 2026-10-11 10:21 by 不是山谷!
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 qR2AdCWTVtkw 2026-10-09 4/200 2026-10-11 03:14 by M0zrYVSAnxpE
[有机交流] 各位大佬,路线设计求助 +6 zapen 2026-10-08 8/400 2026-10-10 15:59 by zapen
[基金申请] 入职后第一次管课题组的专利缴费,对账才发现官费比别人多掏了一倍 +5 13108017953 2026-10-08 5/250 2026-10-10 11:15 by wdwd123
[有机交流] 我应该选哪条合成路线让实验成功率高一些? +5 jing816y 2026-10-08 9/450 2026-10-10 09:05 by zapen
信息提示
请填处理意见