sc_meanzero_snn.m

来自「神经网络的工具箱, 神经网络的工具箱,」· M 代码 · 共 45 行

function [y, sc] = sc_meanzero_snn(x, parameters, s)
%SC_MEANZERO_SNN scaling function; scale data to zero mean.
%
% Syntax
%
%  1. Initial scaling:
%    [y, sc] = sc_meanzero_snn(x)
%       x  - values to be scaled.
%       y  - scaled values.
%       sc - sc_struct containing scaling information.
%
%  2. Scale using parameters of initial scaling:
%    y = sc_meanzero_snn(x, sc.parameters)
%       x             - values to be scaled.
%       sc.parameters - parameters containing scaling parameters.
%       y             - scaled values.
%  
%  3. Inverse scaling:
%    x = sc_meanzero_snn(y, sc.parameters, 'inv');
%       y             - scaled values.
%       sc.parameters - parameters containing scaling parameters.
%       x             - inversed values.
%
% See also
%
%   SCALE_SNN
%

if (nargin == 1)
  sc.name = 'sc_meanzero_snn';
  sc.parameters.mean = mean(x(find(~isnan(x))));
  y = x - sc.parameters.mean;
elseif (nargin == 2)
  y = x - parameters.mean;
elseif (nargin == 3)
  if strcmp('inv', s)
     y = x + parameters.mean;
  else
     error('SC_MEANZERO_SNN: 3rd argument must be ''inv''.');
  end
else
  error('SC_MEANZERO_SNN: incorrect number of input arguments');
end