step1.asv

在模式识别应用中

function step1()
disp ( 'step1' );
global N1 N2 N c D d X i B l Jresult r q Q Psi Xcomplement;
q ( i + 1 ) = r ( i + 1 ) - ( D - d - i - 1 );

for k = 1 : r ( i + 1 )     %计算判据值
    xj = Psi ( i + 1 , k );
    temp = Xcomplement ( i + 1 , : );
    tempindex1 = find ( temp == xj );
    temp ( tempindex1 ) = 0;
    tempindex = find ( temp > 0 );
    Jresult ( i + 1 , k ) = J ( X ( : , temp ( tempindex ) ) );
end

[ sJ , Jindex ] = sort ( Jresult ( i + 1 , 1 : r ( i + 1 ) ) ); %判据值升序排序
Q ( i + 1 , 1 : q ( i + 1 ) ) = Psi ( i + 1 , Jindex ( 1 : q ( i + 1 ) ) ); %取前qi项作为Qi的元素

Psi ( i + 2 , 1 : ( r ( i + 1 ) - q ( i + 1 ) ) ) = Psi ( i + 1 , Jindex ( q ( i + 1 ) + 1 : r ( i + 1 ) ) );%从当前所讨论的节点上可用来为下一级选择舍弃的特征集合Psi中去掉Qi
r ( i + 2 ) = r ( i + 1 ) - q ( i + 1 );%修改集合Psi中元素的数目r

step2();
return;