24小时热门版块排行榜    

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

18704487833

铜虫 (初入文坛)

[求助] 1stopt程序,求修改

Title "Type your title here";
LoopConstant r=[0:0.02:1];
Constant kr=1.6,lamda0=3,u=0.3,theta0=0.1,theta1c=0.12,theta1s=0.15;//Parameters ;
Variable t=[0.0:3.14],b=0,b'=1;
ODEOptions=[SS=0.01,A=0,P=5];
Plot b[t], b';
ChartType =3;
ODEFunction b''=((r*cos(b)+u*sin(t))^2+(b'*r+(lamda0*(1+kr*r*cos(t)))*cos(b)+u*sin(beta)*cos(t))^2)*sin(2*(theta0+theta1c*cos(t)+theta1s*sin(t))-2*(atan((b'*r+(lamda0*(1+kr*r*cos(t)))*cos(b)+u*sin(beta)*cos(t))/((r*cos(b)+u*sin(t))))))/(13.04651163*0.04*(3*r^2+0.02^2/4)/3.3/0.5273)-sin(b)*cos(b);   //Function ;
这个程序哪里有错误?求大神指点一二

1stopt程序,求修改
捕获.PNG
回复此楼

» 猜你喜欢

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

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

雕刻你的拾光

新虫 (初入文坛)

Parameters X0, Xm, um,a,b,P0,Yx,Yp,m,S0;
Variables t, X, P, S;
Function   X=X0*Xm*exp(um*t)/(Xm-X0+X0*exp(um*t))
           P=P0+a*(X0*Xm*exp(um*t)/(Xm-X0+X0*exp(um*t))-X0)+(b*Xm/um)*ln((Xm-X0+X0*exp(um*t))/Xm)
           S=S0-(1/Yx+a/Yp)*(X0*Xm*exp(um*t)/(Xm-X0+X0*exp(um*t)-X0)-Xm/um*(b/Yp+m)*ln((Xm-X0+X0*exp(um*t))/Xm);
Data;
t    X          P        S
0   0.05        0        79
4   0.16        0        78
8   0.6515      0        76
12  1.5426      1.5      74
16  2.4047      4.9      69
20  3.1066      8.7      60
24  3.6693      12.4     50
28  3.8165      16.1     43
32  3.8874      17.2     40
36  3.9618      17.9     38
就是这个,方程应该没啥问题,求专家帮我看看
3楼2014-12-16 21:37:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 5 个回答

雕刻你的拾光

新虫 (初入文坛)

//Parameters a, b, u,;
//Variables t, x,;
//QuickReg ;
//Function  x=a*b*exp(u*t)/(b-a+a*exp(u*t));
//RowData ;
          t=0,4,8,12,16,20,24,28,32,36;
          x=0.05,0.16,0.6515,1.5426,2.4047,3.1066,3.6693,3.8165,3.8874,3.9618;
我想求出a b u 的最佳估算值,求帮忙指点一下
2楼2014-12-16 18:19:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

雕刻你的拾光

新虫 (初入文坛)

Parameters X0, Xm, um,a,b,P0,Yx,Yp,m,S0;
Variables t, X, P, S;
Function   X=X0*Xm*exp(um*t)/(Xm-X0+X0*exp(um*t))
           P=P0+a*(X0*Xm*exp(um*t)/(Xm-X0+X0*exp(um*t))-X0)+(b*Xm/um)*ln((Xm-X0+X0*exp(um*t))/Xm)
           S=S0-(1/Yx+a/Yp)*(X0*Xm*exp(um*t)/(Xm-X0+X0*exp(um*t)-X0)-Xm/um*(b/Yp+m)*ln((Xm-X0+X0*exp(um*t))/Xm);
Data;
t    X          P        S
0   0.05        0        79
4   0.16        0        78
8   0.6515      0        76
12  1.5426      1.5      74
16  2.4047      4.9      69
20  3.1066      8.7      60
24  3.6693      12.4     50
28  3.8165      16.1     43
32  3.8874      17.2     40
36  3.9618      17.9     38
三个函数表达式分开算没问题,在一起算就说有误,什么情况啊
4楼2014-12-16 21:40:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lipenggg

专家顾问 (正式写手)

Parameters X0, Xm, um,a,b,P0,Yx,Yp,m,S0;
Variables t, X, P, S;
Function   X=X0*Xm*exp(um*t)/(Xm-X0+X0*exp(um*t));
           P=P0+a*(X0*Xm*exp(um*t)/(Xm-X0+X0*exp(um*t))-X0)+(b*Xm/um)*ln((Xm-X0+X0*exp(um*t))/Xm);
           S=S0-(1/Yx+a/Yp)*(X0*Xm*exp(um*t)/(Xm-X0+X0*exp(um*t)-X0)-Xm/um*(b/Yp+m)*ln((Xm-X0+X0*exp(um*t))/Xm));
Data;
t    X          P        S
0   0.05        0        79
4   0.16        0        78
8   0.6515      0        76
12  1.5426      1.5      74
16  2.4047      4.9      69
20  3.1066      8.7      60
24  3.6693      12.4     50
28  3.8165      16.1     43
32  3.8874      17.2     40
36  3.9618      17.9     38
一团和气
5楼2015-06-19 16:45:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
信息提示
请填处理意见