untitled1.asv

粒子群算法

%function [ output_args ] = Untitled1( input_args )
%UNTITLED1 Summary of this function goes here
i=1;
j=1;
k=1;
X=[1;1;5;5;5;9;9;8;8;6];
n = size(X,1);
while i<=n,
    
  while  i+j<=n & X(i,1)==X(i+j,1)
      
     
         j=j+1;  
          
       
  end

  
Y= zeros(k,1);  
if k>1
 for t=1:k-1
   Y(t,1)=T(t,1);   
 end
end
   Y(k,1)=X(i,1);
   T=Y;
     k=k+1;
   i=i+j;
   j=1;

end