72
73% Competitive Soft Transfer Function
74function a = softmax_apply(n)
75nmax = max(n,[],1);
76n = bsxfun(@minus,n,nmax);
77numer = exp(n);
78denom = sum(numer,1); 
79denom(denom == 0) = 1;
80a = bsxfun(@rdivide,numer,denom);
81end
82
83% Sigmoid Symmetric Transfer Function