shengjingyuan.m

来自「应用matlab应用平台信号采集程序设计与整理。」· M 代码 · 共 60 行

function y=shengjingyuan(dx,dy)
%function [rx ry yx yy bx by gx gy]=shengjingyuan(w12,w21)
%dx=-1:0.1:1;
%dy=-1:0.1:1;
y1=0;
y2=0;
a1=0;
a2=0;
%kr=0;
%ky=0;
%kb=0;
%kg=0;
%for i=1:21
%    for j=1:21
        while abs(abs(y1*y2)-1.0)>0.000001
%1号神经元
          p1=0.5*y2+dx;
          a1=p1+a1;
          if a1<-1.0
             y1=-1.0;
          elseif a1<1.0
              y1=a1;
          else
              y1=1.0;
          end
%2号神经元
          p2=0.5*y1+dy;
          a2=p2+a2;
          if a2<-1.0
              y2=-1.0;
          elseif a2<1.0
              y2=a1;
          else
              y2=1.0;
          end
        end       
%        switch y2+2*y1
%           case 3.0
%            kr=kr+1;
%              rx(kr)=dx(i);
%              ry(kr)=dy(j);
%            case -1.0
%              kg=kg+1;  
%              gx(kg)=dx(i);
%              gy(kg)=dy(j);
%            case 1.0
%              ky=ky+1;  
%              yx(ky)=dx(i);
%              yy(ky)=dy(j);
%            otherwise
%              kb=kb+1;  
%              bx(kb)=dx(i);
%%%             by(kb)=dy(j); 
%        end
%    end
%end
y(1)=y1;
y(2)=y2;

<i