
% lyngby_uis_nns       - Script executed for Neural network saliency 
%
%       See also: lyngby_nns_global, lyngby_ui_global

% cvs : $Id: lyngby_uis_nns.m,v 1.1 1998/11/18 19:40:13 fnielsen Exp $ 
%       $Revision: 1.1 $    

    if isempty(R)
      RD = [];
    else
      RD = DISCRIM_TMASK * R;
    end
    [RESULT_NNS, RESULT_NNS_S1, RESULT_NNS_PRED, RESULT_NNS_V, ...
	  RESULT_NNS_W, ...
	  RESULT_NNS_E, RESULT_NNS_INFO] = ...
	lyngby_nns_main(DISCRIM_TMASK * XN, DISCRIM_TMASK * PN, ...
	'Type', NNS_TYPE, 'SVDComponents', NNS_SVDCOMPONENTS, ...
	'NNInput', NNS_NNINPUT, 'GenOptim', NNS_GENOPTIM, ...
	'Validation', NNS_VALIDATION, ...
	'HiddenUnits', NNS_HIDDENUNITS, ...
	'Reg', NNS_REGULARIZATION, ...
	'Info', NNS_INFORMATION, ...
	'Run', RD);
    
	  
