24小时热门版块排行榜    

查看: 265  |  回复: 0

f2012

新虫 (小有名气)

[求助] matlab 语言错误

>> T=1700;
p=[45584.0871,39280.9406,10069.7385,34484.3661];   %c1=b1/mn  c2=a1/si
q=[-28.50974,-6.8812,-2.1133,-17.838];

k=zeros(1,4);
for i=1:1:4;
k(i)=exp(p(i)/T+q(i));
end

N1=zeros(1,26);
N2=zeros(1,26);
N3=zeros(1,26);
N4=zeros(1,26);
N5=zeros(1,26);
N6=zeros(1,26);
S=zeros(1,3);
U=zeros(1,3);
g=zeros(1,2);
h=zeros(1,2);
x=zeros(1,2);

a=[0.05 0.057 0.1 0.111 0.15 0.18 0.2 0.25 0.257 0.3 0.334 0.35 0.4 0.46 0.5
0.56 0.6 0.625 0.65 0.666 0.7 0.75 0.8 0.85 0.9 0.95];
b=[0.95 0.943 0.9 0.889 0.85 0.82 0.8 0.75  0.743 0.7 0.666 0.65 0.6 0.54 0.5
0.44 0.4 0.375 0.35 0.334 0.3 0.25 0.2 0.15 0.1 0.05];
E=0.0000001;

for i=1:1:26
if i==1;
g(1)=0.02*a(i);
h(1)=b(i);
elseif i>1;
g(1)=N1(i-1)*a(i)/a(i-1);
h(1)=N2(i-1)*b(i)/b(i-1);
end

while j<100000;
g(2)=g(1)+E;
h(2)=h(1)+E;
x(1)=g(1);
x(2)=h(1);
W=x(1)+x(2)+k(1)*(x(1)^3)*x(2)+k(2)*(x(1)^5)*(x(2)^3)+k(3)*x(1)* x(2)+k(4)*
(x(1)^11)* (x(2)^19)-1;
V=b(i)*x(1)-a(i)*x(2)+(3*b(i)-a(i))*k(1)*(x(1)^3)* x(2)+ (5*b(i)- 3*a(i))*k
(2)*(x(1)^5)* (x(2)^3)+(b(i)-a(i))*k(3)*x(1)*x(2)+(11*b(i)-19*a(i))*k(4)*(x
(1)^11)* (x(2)^19);
S(1)=W;
U(1)=V;

x(1)=g(2);
x(2)=h(1);
W=x(1)+x(2)+k(1)*(x(1)^3)*x(2)+k(2)*(x(1)^5)*(x(2)^3)+k(3)*x(1)* x(2)+k(4)*
(x(1)^11)* (x(2)^19)-1;
V=b(i)*x(1)-a(i)*x(2)+(3*b(i)-a(i))*k(1)*(x(1)^3)* x(2)+ (5*b(i)- 3*a(i))*k
(2)*(x(1)^5)* (x(2)^3)+(b(i)-a(i))*k(3)*x(1)*x(2)+(11*b(i)-19*a(i))*k(4)*(x
(1)^11)* (x(2)^19);
S(2)=W;
U(2)=V;

x(1)=g(1);
x(2)=h(2);
W=x(1)+x(2)+k(1)*(x(1)^3)*x(2)+k(2)*(x(1)^5)*(x(2)^3)+k(3)*x(1)* x(2)+k(4)*
(x(1)^11)* (x(2)^19)-1;
V=b(i)*x(1)-a(i)*x(2)+(3*b(i)-a(i))*k(1)*(x(1)^3)* x(2)+ (5*b(i)- 3*a(i))*k
(2)*(x(1)^5)* (x(2)^3)+(b(i)-a(i))*k(3)*x(1)*x(2)+(11*b(i)-19*a(i))*k(4)*(x
(1)^11)* (x(2)^19);
S(3)=W;
U(3)=V;

S(2)=S(2)-S(1);
U(2)=U(2)-U(1);
S(3)=S(3)-S(1);
U(3)=U(3)-U(1);
D=(S(2)*U(3)-S(3)*U(2))/(E^2);

x(1)=g(1)+(-S(1)*U(3)+S(3)*U(1))/E/D;
x(2)=h(1)+(-S(2)*U(1)+S(1)*U(2))/E/D;
W=x(1)+x(2)+k(1)*(x(1)^3)*x(2)+k(2)*(x(1)^5)*(x(2)^3)+k(3)*x(1)* x(2)+k(4)*
(x(1)^11)* (x(2)^19)-1;
V=b(i)*x(1)-a(i)*x(2)+(3*b(i)-a(i))*k(1)*(x(1)^3)* x(2)+ (5*b(i)- 3*a(i))*k
(2)*(x(1)^5)* (x(2)^3)+(b(i)-a(i))*k(3)*x(1)*x(2)+(11*b(i)-19*a(i))*k(4)*(x
(1)^11)* (x(2)^19);

if abs(W)>0.0000005;
   g(1)=x(1);
   h(1)=x(2);
elseif abs(V)>0.0000005
   g(1)=x(1);
   h(1)=x(2);
else
    break;
end
j=j+1;

end
   N1(i)=x(1);
   N2(i)=x(2);
   N3(i)=k(1)*(N1(i)^3)*N2(i);
   N4(i)=k(2)*(N1(i)^5)*(N2(i)^3);
   N5(i)=k(3)*N1(i)*N2(i);
   N6(i)=k(4)*(N1(i)^11)*(N2(i)^19);
      
end
activety=[N1;N2;N3;N4;N5;N6;]

>> 运行结果都是0

[ Last edited by f2012 on 2013-10-31 at 23:22 ]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

智能机器人

Robot (super robot)

我们都爱小木虫

找到一些相关的精华帖子,希望有用哦~

科研从小木虫开始,人人为我,我为人人
相关版块跳转 我要订阅楼主 f2012 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] filecode +8 cratir 2026-08-14 12/600 2026-08-15 18:08 by zyfgau
[基金申请] filecode=后面第一个是大写字母 +3 wangze12014 2026-08-14 4/200 2026-08-15 18:05 by babangida
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +27 医学老男孩 2026-08-13 58/2900 2026-08-15 15:57 by GZUZM
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +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
[基金申请] 各位道友,我要去昆明玩几天,回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
[基金申请] 咱们一起用铁证分析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
[硕博家园] 请教兼职经验 +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
[基金申请] 我的国基提前知道中了,可是同事的操作让我实在接受不了,怎么会有这样的人 +10 家与远方 2026-08-10 15/750 2026-08-14 02:08 by 绵羊哥哥
[基金申请] 静等基金结果 +8 gjjjzhong 2026-08-10 21/1050 2026-08-13 17:56 by 且听虎啸
[基金申请] 不应该看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 +7 wwncly 2026-08-10 13/650 2026-08-11 19:36 by 冰心玉壶晴
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 7/350 2026-08-11 19:25 by Tide man
[基金申请] 确定了,国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 据悉今年马上要出结果了 +7 瞬息宇宙 2026-08-10 8/400 2026-08-10 12:42 by Vivilian
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
信息提示
请填处理意见