sgnt_merge.m

来自「用matlab编写的基于自生成神经网络(self-generated neura」· M 代码 · 共 24 行

function node= sgnt_merge(node,m)

[nr,nc]= size(node);
 for i=1:1:nr 
     if node(i,m+3)>0
        if node(node(i,m+3),m+4)==0
           temp=0;
           for k=1:1:m+1
              if node(i,k)==node(node(i,m+3),k)  temp=temp+1;  end
           end
           if temp == m+1
              node(node(i,m+3),m+2)=0;
              temp_ptr = node(node(i,m+3),m+3);
              child= node(node(i,m+3),m+3);
              node(node(i,m+3),m+3)= 0;
              node(i,m+3)=temp_ptr;
              while (child>0)
                 node(child,m+2)= i;
                 child= node(child,m+4);
              end
           end
        end 
     end
  end