24小时热门版块排行榜    

查看: 1856  |  回复: 10
本帖产生 1 个 程序强帖 ,点击这里进行查看

aimforao

禁虫 (正式写手)

本帖内容被屏蔽

» 猜你喜欢

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

已阅   关注TA 给TA发消息 送TA红花 TA的回帖
回帖置顶 ( 共有1个 )

dbb627

荣誉版主 (著名写手)

【答案】应助回帖


jjdg(金币+1, 程序强帖+1): 辛苦了 2011-11-28 01:15:06
CODE:
X=[-7.022 -2.391 0.7963 106.444 10e-4 0.365
-7.022 -2.391 0.7963 106.444 10e-3 0.479
-7.022 -2.391 0.7963 106.444 10e-2 0.592
-7.096 -2.524 1.9082 98.851  10e-4 0.427
-7.096 -2.524 1.9082 98.851  10e-3 0.575
-7.096 -2.524 1.9082 98.851  10e-2 0.711
-6.648 -2.392 1.9277 135.257 10e-4 0.595
-6.648 -2.392 1.9277 135.257 10e-3 0.701
-6.648 -2.392 1.9277 135.257 10e-2 0.891];
%====回归法==============
y= X(:,6)./(1-X(:,6));
XX=[X(:,1).*X(:,5) X(:,2).*X(:,5) X(:,3).*X(:,5) X(:,4).*X(:,5) X(:,5)];
[B,BINT,R,RINT,STATS] = REGRESS(y,XX)
rcoplot(R,RINT)
%=========最小二乘法=========
F=@(a,x)(a(1)*x(:,1)+a(2)*x(:,2)+a(3)*x(:,3)+a(4)*x(:,4)+a(5)).*x(:,5)./...
    (1+(a(1)*x(:,1)+a(2)*x(:,2)+a(3)*x(:,3)+a(4)*x(:,4)+a(5)).*x(:,5));
[par,RESNORM,RESIDUAL,EXITFLAG]= lsqcurvefit(F,rand(1,5), X(:,1:5), X(:,6))
%=====结果比较====
YY=XX*B;
Te=YY./(1+YY);
f=F(par,X(:,1:5));
plot(X(:,6),'*-');hold on;plot(Te,'ro-')
hold on;plot(f,'<-g')
legend('原数据','回归法','最小二乘')

'回归法',
Te =

    0.0151
    0.1329
    0.6052
    0.0251
    0.2049
    0.7204
    0.0770
    0.4547
    0.8929

'最小二乘'
f =

    0.0726
    0.4390
    0.8867
    0.1919
    0.7037
    0.9596
    0.5254
    0.9172
    0.9910


The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
6楼2011-11-27 14:22:50
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

★ ★
aimforao(金币+30): 不错,这么短的时间内做出来,以后要向你学习了。 2011-11-27 13:50:12
jjdg(金币+2): 辛苦了 2011-11-27 14:12:34
引用回帖:
1楼: Originally posted by aimforao at 2011-11-27 11:23:40:
ie=(a*x1+b*x2+c*x3+d*x4+e)*x5/(1+(a*x1+b*x2+c*x3+d*x4+e)*x5);
x1     x2     x3     x4      x5    ie
-7.022 -2.391 0.7963 106.444 10e-4 0.365
-7.022 -2.391 0.7963 106.444 10e-3 0.479
-7.022 -2.3 ...

基于你的方程形式比较特殊,两种方法,回归法和最小二乘法
CODE:
X=[-7.022 -2.391 0.7963 106.444 10e-4 0.365
-7.022 -2.391 0.7963 106.444 10e-3 0.479
-7.022 -2.391 0.7963 106.444 10e-2 0.592
-7.096 -2.524 1.9082 98.851  10e-4 0.427
-7.096 -2.524 1.9082 98.851  10e-3 0.575
-7.096 -2.524 1.9082 98.851  10e-2 0.711
-6.648 -2.392 1.9277 135.257 10e-4 0.595
-6.648 -2.392 1.9277 135.257 10e-3 0.701
-6.648 -2.392 1.9277 135.257 10e-2 0.891];
%====回归法==============
y= X(:,6)./(1-X(:,6));
XX=[X(:,1).*X(:,5) X(:,2).*X(:,5) X(:,3).*X(:,5) X(:,4).*X(:,5) X(:,5)];
[B,BINT,R,RINT,STATS] = REGRESS(y,XX)
rcoplot(R,RINT)
%=========最小二乘法=========
F=@(a,x)(a(1)*x(:,1)+a(2)*x(:,2)+a(3)*x(:,3)+a(4)*x(:,4)+a(5)).*x(:,5)./...
    (1+(a(1)*x(:,1)+a(2)*x(:,2)+a(3)*x(:,3)+a(4)*x(:,4)+a(5)).*x(:,5));
[par,RESNORM,RESIDUAL,EXITFLAG]= lsqcurvefit(F,B, X(:,1:5), X(:,6))

The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
2楼2011-11-27 13:09:07
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

★ ★ ★
余泽成(金币+3): 谢谢参与应助! 2011-12-02 17:24:57
回归法结果
B =

   20.1351
         0
   19.7714
    1.3244
         0


BINT =

    6.9309   33.3393
         0         0
  -10.3720   49.9148
    0.4520    2.1969
         0         0


R =

    0.5595
    0.7661
   -0.0822
    0.7194
    1.0952
   -0.1167
    1.3857
    1.5106
   -0.1649


RINT =

   -2.2418    3.3607
   -1.9613    3.4934
   -0.3545    0.1901
   -2.0378    3.4766
   -1.4941    3.6846
   -0.3734    0.1400
   -1.0478    3.8193
   -0.8151    3.8363
   -0.3877    0.0579


STATS =

    0.8439   26.9497    0.0010    1.1444

最小二乘法

Local minimum possible.

lsqcurvefit stopped because the final change in the sum of squares relative to
its initial value is less than the default value of the function tolerance.




par =

  296.9674   65.5619  306.2606   19.8283  -34.1639


RESNORM =

    0.3692


RESIDUAL =

   -0.2924
   -0.0400
    0.2947
   -0.2351
    0.1287
    0.2486
   -0.0696
    0.2162
    0.1000


EXITFLAG =

     3


The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
3楼2011-11-27 13:11:55
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

aimforao

禁虫 (正式写手)

本帖内容被屏蔽

4楼2011-11-27 13:12:13
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

aimforao

禁虫 (正式写手)

本帖内容被屏蔽

5楼2011-11-27 14:01:51
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

aimforao

禁虫 (正式写手)

本帖内容被屏蔽

7楼2011-11-27 15:41:51
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

dingd

铁杆木虫 (职业作家)

【答案】应助回帖


aimforao(金币+5): 这个我用过,效果不是太好。 2011-11-27 22:28:32
jjdg(金币+1): 感谢参与 2011-11-28 01:15:33
一楼的问题本身就是多解的,1stOpt求解:
CODE:
Variable x1,x2,x3,x4,x5,ie;
Function  ie=(a*x1+b*x2+c*x3+d*x4+e)*x5/(1+(a*x1+b*x2+c*x3+d*x4+e)*x5);
Data;
x1     x2     x3     x4      x5    ie
-7.022 -2.391 0.7963 106.444 10e-4 0.365
-7.022 -2.391 0.7963 106.444 10e-3 0.479
-7.022 -2.391 0.7963 106.444 10e-2 0.592
-7.096 -2.524 1.9082 98.851  10e-4 0.427
-7.096 -2.524 1.9082 98.851  10e-3 0.575
-7.096 -2.524 1.9082 98.851  10e-2 0.711
-6.648 -2.392 1.9277 135.257 10e-4 0.595
-6.648 -2.392 1.9277 135.257 10e-3 0.701
-6.648 -2.392 1.9277 135.257 10e-2 0.891

结果1:
均方差(RMSE): 0.202527890633088
残差平方和(SSE): 0.369157918358593
相关系数(R): 0.898894702339435
相关系数之平方(R^2): 0.808011685893902
决定系数(DC): -0.78116114903423

参数        最佳估算
----------        -------------
a        171.747254365496
b        476.920810961258
c        347.506046605747
d        19.8838381108433
e        31.1764490928192

结果2:
均方差(RMSE): 0.202527890633088
残差平方和(SSE): 0.369157918358592
相关系数(R): 0.898894697992795
相关系数之平方(R^2): 0.808011678079559
决定系数(DC): -0.781161149034225

参数        最佳估算
----------        -------------
a        473.628802180385
b        -461.290822287828
c        253.57821566365
d        19.6210369282456
e        10.4930047968312

结果3:
均方差(RMSE): 0.202527890633088
残差平方和(SSE): 0.369157918358593
相关系数(R): 0.898894694897679
相关系数之平方(R^2): 0.808011672515192
决定系数(DC): -0.781161149034227

参数        最佳估算
----------        -------------
a        260.476868413158
b        743.522098490703
c        371.156955344628
d        17.8126496010584
e        1493.31184889042

结果4:
均方差(RMSE): 0.202527890633089
残差平方和(SSE): 0.369157918358595
相关系数(R): 0.898894706202555
相关系数之平方(R^2): 0.808011692838977
决定系数(DC): -0.781161149034242

参数        最佳估算
----------        -------------
a        12.9772017982061
b        963.05053780153
c        396.215255571043
d        20.0489254291642
e        22.2696191795072
8楼2011-11-27 19:51:16
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

aimforao

禁虫 (正式写手)

本帖内容被屏蔽

9楼2011-11-29 17:07:30
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

引用回帖:
9楼: Originally posted by aimforao at 2011-11-29 17:07:30:
[par,RESNORM,RESIDUAL,EXITFLAG]= lsqcurvefit(F,rand(1,5), X(:,1:5), X(:,6))

这段代码是什么意思啊,我看不懂,可以告诉一下我吗?

你不会看帮助文档吗 help lsqcurvefit 就有他的用法介绍,解释每项的含义太麻烦了吧
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
10楼2011-11-29 17:30:01
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 aimforao 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +31 医学老男孩 2026-08-13 69/3450 2026-08-16 00:16 by mo_mo_mo_mo
[基金申请] filecode=后面第一个是大写字母 +6 wangze12014 2026-08-14 7/350 2026-08-15 20:12 by gltch
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +7 Ldrop2023 2026-08-13 7/350 2026-08-15 15:57 by mzhh2000
[基金申请] 关于Filecode分析方法 +10 majunge000 2026-08-10 13/650 2026-08-15 12:26 by hanpeng972
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +7 启萌科技 2026-08-12 22/1100 2026-08-14 23:45 by Noways
[基金申请] 是这周出结果还是下周出结果? +4 yuleib84 2026-08-11 4/200 2026-08-14 23:05 by lfy8008
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +8 布布和一二 2026-08-10 11/550 2026-08-14 14:58 by Equinoxhua
[基金申请] 应该是93bebmhtak前后十一个字符比较关键 +23 Lanmanbaby 2026-08-09 37/1850 2026-08-14 13:40 by Equinoxhua
[硕博家园] 请教兼职经验 +3 是阿文鸭 2026-08-09 3/150 2026-08-14 12:07 by HER12025
[硕博家园] 读博的好处 +4 lnee 2026-08-11 4/200 2026-08-14 10:20 by ahsoarli
[基金申请] filecode +15 documentary 2026-08-10 17/850 2026-08-14 10:08 by kissu88
[基金申请] FileCode能看出啥? +10 要乐观耀哥 2026-08-10 32/1600 2026-08-14 09:37 by 要乐观耀哥
[文学芳草园] 阿姨 +4 汪汪锅 2026-08-09 4/200 2026-08-13 19:43 by arzu_hma
[基金申请] 不应该看fileCode +7 且听虎啸 2026-08-12 9/450 2026-08-13 14:27 by flydreamws
[基金申请] 分享一下我之前已中青C的计划书的filecode +4 布布和一二 2026-08-11 5/250 2026-08-13 12:56 by cratir
[基金申请] 结合人工智能,周易传统文化,filecode打分制来了,3分以上希望很大。 +3 Tide man 2026-08-12 4/200 2026-08-13 08:35 by ZJTJZ
[基金申请] 2019年青年基金涵评意见,大家看看几个A,几个B? +11 Tide man 2026-08-11 11/550 2026-08-13 07:35 by 撸猫猫
[基金申请] 帮忙看看fileCode +7 wwncly 2026-08-10 13/650 2026-08-11 19:36 by 冰心玉壶晴
[基金申请] 确定了,国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 国自然结果 +4 Vierhys 2026-08-10 8/400 2026-08-10 15:06 by Vierhys
信息提示
请填处理意见