set_wcf_e_snn.m

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

function wcf_struct = set_wcf_e_snn(wcf_struct, e)
%SET_WCF_E_SNN Set output variable error functions of a wcf_struct. 
%
% Syntax
%
%   wcf_struct = set_wcf_e_snn(wcf_struct, e)
%
%    wcf_struct - wcf_struct with wcf_snn parameters.
%           e   - [NL x 1] cell matrix of output variable error function names.
%                 OR string of output variable error function for all variables.
%
%  (NL = #outputs)
% 


if ~strcmp(get_costfcn_name_snn(wcf_struct), 'wcf_snn')
   error('Wcf_struct does not have correct cost funtion');
end

if ~isstr(e)

   if ~(size(e,2) == 1)
         error('Size of second dimension of ''e'' must be 1');
   end

   e = e(:,1);

end

wcf_struct.fn = e;