www.gusucode.com > mbcmodels 工具箱 matlab 源码程序 > mbcmodels/@xreghybridrbf/set.m

    function varargout = set(m, Property, Value)
%SET set xreghybridrbf properties

%  Copyright 2000-2014 The MathWorks, Inc. and Ford Global Technologies, Inc.




switch lower(Property)
case 'rbfpart'
     m.rbfpart = Value;
     beta = [double(m.linearmodpart);double(m.rbfpart)];
     m = update(m,beta);
     ind= size(m.linearmodpart,1)+1:length(beta);
     m= setstatus(m,ind,getstatus(Value)); %#ok<*FOBS>
case 'linearmodpart'
     m.linearmodpart = Value; 
     beta = [double(m.linearmodpart);double(m.rbfpart)];
     m = update(m,beta);
     m= setstatus(m,1:size(Value,1),getstatus(Value));

otherwise
   try
      m.xreglinear=set(m.xreglinear,Property,Value);
   catch    
       error(message('mbc:xreghybridrbf:InvalidArgument3', Property));
   end
end
if nargout==1
   varargout{1} = m;
else
   assignin('caller', inputname(1), m);
end