test1.asv

粒子群算法

%function [ output_args ] = Untitled1( input_args )
%UNTITLED1 Summary of this function goes here
%  Detailed explanation goes here
H1=xlsread('test.xls',1,'A1:J64');

%H=xlsread('tading.xls',1,'A1:H123');
  
%  
%   [b,a]= butter(5,0.5);
%   H1=filtfilt(b,a,H);

  data=H1;
         data=(data-ones(size(data,1),1)*min(data))./(ones(size(data,1),1)*(max(data)-min(data)));
 H1=data ; 
 
  
 A1=H1(1:40,1:8);
 B1=H1(1:40,9);
 C1=H1(41:60,1:8);
 D1=H1(41:60,9);
 max_ev =8;  %选择主元个数
 [COEFF,SCORE,latent,tsquare]=princomp(A1);
 A2=A1*COEFF(:,1:max_ev);
 C2=C1*COEFF(:,1:max_ev);