谁帮我看看这个程序子段有什么错误

sssssxxxxx921

什么下表索引？不明白啊    我刚自己试过的

sssssxxxxx921

不好意思刚才发错了附件   以下是我的出错的程序的附件  
请大侠帮忙看看

sssssxxxxx921

附件已发上来了   帮忙看看  很急

geoer

自己调试吧.Deformation先改过来,一会儿Deformation,一会儿Dformation的.

sssssxxxxx921

那我已经改过了   可是运算大半天也出不来结果  这是怎么回事啊

duzeli

改过Deformation之后，程序怎么运行几小时也不完啊   

大牛改改这个高难度的疑问吧

sssssxxxxx921

大哥帮帮忙吧   程序可以运行  但出不来开结果   这到底是怎么回事啊

eight

我刚拿到的notebook配置很低，无法安装matlab，所以帮不了你

sssssxxxxx921

帮帮忙看看这个程序，实在不知道怎么出错了
在用ode后q居然出现了复数，改了好几处都不见效   下面是我现在的程序

sssssxxxxx921

[quote]function dq=Rotors_System_Sub_Func(t,q)
global BN Nb1 Nb2 w1 w2 Ro1 Ri1 Ro2 Ri2
r01=0.00002;%m
r02=0.00005;%m
m1=7.86;%kg
m2=11.93;%kg
W1=m1*9.8;%N
W2=m2*9.8;%N
Kb1=1.4656e10;%N/m^1.5
Kb2=1.7518e10;%N/m^1.1
q
Fx11=0;
Fy11=0;
for i=1:Nb1
   
    sita(i)=2*pi/Nb1*(i-1)+BN/Nb1*w1*2*pi*t;
    Deformation(i,1)=q(1,1)*cos(sita(i))+q(2,1)*sin(sita(i))-r01
    if Deformation(i)<=0
        Deformation(i)=0;
    end
   
    fx11=Kb1*(Deformation(i))^1.5*cos(sita(i));
    fy11=Kb1*(Deformation(i))^1.5*sin(sita(i));
   
    Fx11=Fx11+fx11;
    Fy11=Fy11+fy11;
end
Fx12=Fx11;
Fy12=Fy11;
Deformation

Fx21=0;
Fy21=0;
for j=1:Nb2
    sita(j)=2*pi/Nb2*(j-1)+(Ro2/(Ro2+Ri2)*w1+Ri2/(Ro2+Ri2)*w2)*2*pi*t;
    Deformation1(j,1)=q(3)*cos(sita(j))+q(4)*sin(sita(j))-r02;
   if Deformation1(j)<=0
       Deformation1(j)=0;
    end
   
    fx21=Kb2*(Deformation1(j))^1.5*cos(sita(j));
    fy21=Kb2*(Deformation1(j))^1.5*sin(sita(j));
   
Fx21=Fx21+fx21;
Fy21=Fy21+fy21;
end

Fx22=0;
Fy22=0;
for k=1:Nb1
    sita(k)=2*pi/Nb1*(k-1)+BN/Nb1*w2*2*pi*t;
    Deformation2(k,1)=q(3,1)*cos(sita(i))+q(4,1)*sin(sita(i))-r01;
    if Deformation2(k)<=0
        Deformation2(k)=0;
    end
   
    fx22=Kb1*(Deformation2(k))^1.1*cos(sita(k));
    fy22=Kb1*(Deformation2(k))^1.1*sin(sita(k));
   
    Fx22=Fx22+fx22;
    Fy22=Fy22+fy22;
end

P=1470;
Cx11=1500;Cy11=1500;
Cx12=2500;Cy12=2500;
Cx21=2000;Cy21=2000;
Cx22=7000;Cy22=7000;
%dq(1:4,1)=q(5:8,1);
dq(5:8,1)=[-1/m1*((Cx11+Cx12)*q(5,1)+Fx11+Fx12-(W1+Fx21+Cx21*q(7,1)));...
         -1/m1*((Cy11+Cy12)*q(6,1)+Fy11+Fy12-(Fy21+Cy21*q(8,1)));...
          -1/m2*((Cx21+Cx22)*q(7,1)+Fx21+Fx22-(P+W2));...
         -1/m2*((Cy21+Cy22)*q(8,1)+Fy21+Fy22)];
dq(1:4,1)=q(5:8,1);

主程序：function Rotors_System_Func
clear
clc
global BN Nb1 Nb2 w1 w2 Ro1 Ri1 Ro2 Ri2
n_one_T=200;   
n_T=200;
%e217QT(85*15*28)
Ro1=4.8828e-2;
Ri1=6.8672e-2;
Nb1=10;
%6D2272822(110*140*19)
Ro2=66.515e-3;
Ri2=58.5e-3;
Nb2=34;
n_n=0;
w2_min=100;
w2_max=300;
w2_step=100;
w1_rpm=11000;
q_initial(1:8,1)=1e-11;
BN=Ri1/(Ri1+Ro1)*Nb1;
tic
%w2_rpm=100;
for w2_rpm=w2_min:w2_step:w2_max
    n_n=n_n+1
    w2=w2_rpm/60;
    w1=w1_rpm/60;
    r=Ro2/(Ro2+Ri2);
    w_cage=w1*r+w2*(1-r);
    w_vc=w_cage*Nb2;
    T_vc=2*pi/w_vc;
    dt=T_vc/n_one_T;
    time=n_T*T_vc;
    n=round(time/dt);
    t_span(1:n)=linspace(0,time,n);
    options=odeset('RelTol',1e-6);
   
    [t,q]=ode45('Rotors_System_Sub_Func',t_span,q_initial,options);
   
   
end
toc
%wc=[wc,w_rpm];
%subplot(2,1,1);plot(w2_rpm,q(:,1),'k.')
%subplot(2,1,2);
%subplot(2,2,1);plot(q(98000:100:100000,1),q(98000:100:100000,2),'k.','markersize',1)
%subplot(2,2,2);plot(q(98000:100:100000,3),q(98000:100:100000,4),'k.','markersize',1)
%subplot(2,2,3);plot(w2_rpm,q(98000:100:100000,3),'k.','markersize',1)
%subplot(2,2,4);plot(w2_rpm,q(98000:100:100000,7),'k.','markersize',1)
[/quote]

sssssxxxxx921

刚才程序没写注释    我又写注释在记事本里    希望再指点一下

geoer

你还没解决呢,运行了下,没报错.可能还有其他问题.
Deformation =

     0     0     0     0     0     0     0     0     0     0


Deformation =

     0     0     0     0     0     0     0     0     0     0

Elapsed time is 38.531000 seconds.
>>