24小时热门版块排行榜    

查看: 266  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 时间戳又变了8-15 +12 archvillain 2026-08-15 23/1150 2026-08-15 20:47 by foyo404
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +29 医学老男孩 2026-08-13 61/3050 2026-08-15 20:41 by cqbnu
[基金申请] filecode=后面第一个是大写字母 +6 wangze12014 2026-08-14 7/350 2026-08-15 20:12 by gltch
[基金申请] 有时候,自然基金真的不能太认真 (我的申报经验) +8 majunge000 2026-08-11 10/500 2026-08-15 18:55 by Equinoxhua
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +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
[硕博家园] 读博的好处 +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
[基金申请] 静等基金结果 +8 gjjjzhong 2026-08-10 21/1050 2026-08-13 17:56 by 且听虎啸
[基金申请] Filecode 又变了,巨变 +3 WH3796 2026-08-12 4/200 2026-08-13 14:13 by 小木虫6752397
[基金申请] 分享一下我之前已中青C的计划书的filecode +4 布布和一二 2026-08-11 5/250 2026-08-13 12:56 by cratir
[基金申请] 综述论文作为代表作会不会影响评审专家的印象分? +11 yufeiwaner 2026-08-09 13/650 2026-08-12 08:17 by yufeiwaner
[基金申请] 什么时候出结果,有咨询渠道??? +3 Tide man 2026-08-11 3/150 2026-08-11 17:54 by kudofaye
[基金申请] 确定了,国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
信息提示
请填处理意见