78
79% Competitive Soft Transfer Function
80function a = softmax_apply(n)
81nmax = max(n,[],1);
82n = bsxfun(@minus,n,nmax);
83numer = exp(n);
84denom = sum(numer,1); 
85denom(denom == 0) = 1;
86a = bsxfun(@rdivide,numer,denom);
87end
88
89% Sigmoid Symmetric Transfer Function