www.gusucode.com > mbcmodels 工具箱 matlab 源码程序 > mbcmodels/@xregunispline/set.m
function varargout= set(m,varargin); % GET overloaded get function % % Value= set(m,'Property',value) % Properties % 'max_knots' % 'init_pop' % 'percent_opt' % 'max_iter' % 'max_func' % 'bit_len' % 'max_gen' % 'fitoptions' % 'algorithm' % Copyright 2000-2004 The MathWorks, Inc. and Ford Global Technologies, Inc. for i=1:2:length(varargin) switch lower(varargin{i}) case 'max_knots' m.FitOptions.Param.Max_Knots=varargin{i+1}; case 'init_pop' m.FitOptions.Param.Init_Pop=varargin{i+1}; case 'percent_opt' m.FitOptions.Param.Percent_Opt=varargin{i+1}; case 'max_iter' m.FitOptions.Param.Max_Iter=varargin{i+1}; case 'max_func' m.FitOptions.Param.Max_Func=varargin{i+1}; case 'bit_len' m.FitOptions.Param.Bit_Len=varargin{i+1}; case 'max_gen' m.FitOptions.Param.Max_Gen=varargin{i+1}; case 'jupp' m.FitOptions.Param.Jupp = varargin{i+1}; case 'fitoptions' m.FitOptions=varargin{i+1}; case 'algorithm' m.FitOptions.Algorithm=varargin{i+1}; otherwise try m.xregmodel=set(m.xregmodel,varargin{i:i+1}); catch m.mv3xspline=set(m.mv3xspline,varargin{i:i+1}); end end end if nargout==1 varargout{1}=m; else assignin('caller',inputname(1),m); end