24小时热门版块排行榜    

查看: 1255  |  回复: 8

wangdeqiang

金虫 (小有名气)

[求助] 1stopt拟合中出现的问题 已有1人参与

Title "DIC-K";
Parameters kI,kII,b;
constant n=3,g=8.1*10^4,u=0.26,k=2.17;
Variable x,y,z;
Function z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))
-sum((kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;
Data;
376.78243        -112.14027        9.73371
374.92666        -111.4325        9.61182
373.12866        -110.7178        9.49729
371.38928        -109.99629        9.39441
369.70935        -109.26811        9.3051
368.08966        -108.5334        9.22794
366.53104        -107.79231        9.15739
365.03425        -107.04503        9.08779
363.60006        -106.29172        9.0149
本人想通过1stopt求解kI,kII,但是运行时系统提示参数kI数值范围定义有误!
请问该如何写程序?
回复此楼

» 猜你喜欢

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

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

dingd

铁杆木虫 (职业作家)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
wangdeqiang: 金币+20, ★★★很有帮助 2014-09-10 20:11:54
公式:
z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))
-sum((kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;

改为:
z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))
-sum(i=1:n)(kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;

结果:
均方差(RMSE):0.0334465479380339
残差平方和(SSE):0.0100680441207408
相关系数(R): 0.989298144852019
相关系数之平方(R^2): 0.978710819407646
确定系数(DC): 0.978710819407646
卡方系数(Chi-Square): 0.000543327950684942
F统计(F-Statistic): 140.916649515266

参数        最佳估算
----------        -------------
ki        0.245068724509857
kii        -5.08642699323206
b        9.4238457540924
2楼2014-09-10 20:00:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wangdeqiang

金虫 (小有名气)

引用回帖:
2楼: Originally posted by dingd at 2014-09-10 20:00:19
公式:
z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))
-sum((kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;

改为:
z=sum(i ...

非常感谢您的答复!
其实我想求kI1,kI2,kI3,KII1,KII2,KII3.
请问能否这样编函数:
z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))-sum(i=1:n)((k/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;
参数又该如何设置?
谢谢!
patience-practise-passion
3楼2014-09-10 20:16:08
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wangdeqiang

金虫 (小有名气)

引用回帖:
2楼: Originally posted by dingd at 2014-09-10 20:00:19
公式:
z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))
-sum((kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;

改为:
z=sum(i ...

非常感谢您的答复!
其实我想求kI1,kI2,kI3,KII1,KII2,KII3.
请问能否这样编函数:
z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))-sum(i=1:n)((kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;
参数又该如何设置?
谢谢!
patience-practise-passion
4楼2014-09-10 21:14:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dingd

铁杆木虫 (职业作家)

公式写成如下:
Function z=sum(i=1:n, kI)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))
-sum(i=1:n, KII)(kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;

均方差(RMSE):0.000319000884196416
残差平方和(SSE):9.15854077062857E-7
相关系数(R): 0.999999031699104
相关系数之平方(R^2): 0.999998063399146
确定系数(DC): 0.999998063399146
卡方系数(Chi-Square): 4.91879921856916E-8
F统计(F-Statistic): 0

参数        最佳估算
----------        -------------
b        9.37438411982016
ki1        240.991105375969
ki2        45.2897205090565
ki3        -0.00759010072910402
kii1        1285.30644313843
kii2        -40.4189608273874
kii3        -4.56724263105769
5楼2014-09-10 21:53:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lipenggg

专家顾问 (正式写手)

Title "DIC-K";
Parameter kI(3),kII(3),b;
constant n=3,g=8.1*10^4,u=0.26,k=2.17;
Variable x,y,z;
Function z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))
           -sum(i=1:n)(kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;
Data;
一团和气
6楼2015-06-23 15:22:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lipenggg

专家顾问 (正式写手)

Title "DIC-K";
Parameter kI(3),kII(3),b;
constant n=3,g=8.1*10^4,u=0.26,k=2.17;
Variable x,y,z;
Function z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))
           -sum(i=1:n)(kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;
Data;
一团和气
7楼2015-06-23 15:24:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lipenggg

专家顾问 (正式写手)

Title "DIC-K";
Parameter kI(3),kII(3),b;
constant n=3,g=8.1*10^4,u=0.26,k=2.17;
Variable x,y,z;
Function z=sum(i=1:n)(kI/2/g*x^(i/2)*(k*sin(i*y/2)+i/2*sin((i/2-2)*y)-(i/2+(-1)^i)*sin(i*y/2)))
           -sum(i=1:n)(kII/2/g*x^(i/2)*(-k*cos(i*y/2)+i/2*cos((i/2-2)*y)+(i/2-(-1)^n)*cos(i*y/2)))+b;
一团和气
8楼2015-06-23 15:28:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lipenggg

专家顾问 (正式写手)


将公式里的KI改为KI[I],KII改为KII后可以用1.5版运行。
一团和气
9楼2015-06-23 15:31:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 wangdeqiang 的主题更新
信息提示
请填处理意见