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

    function b = allparameters(m)
%ALLPARAMETERS full parameters for use with localmulti
%
% b = allparameters(m);
%   [double(m) ; allparameters(m.rbfpart)]

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

Ball= double(m);
m= update(m,Ball);
% push qr and lambda into rbf part so it is stored in xregrbf/allparameters
m.rbfpart= set(m.rbfpart,'qr',get(m,'qr'));
lam = get(m,'lambda');
nlin= size(m.linearmodpart,1);
if isscalar(lam)
    m.rbfpart= set(m.rbfpart,'lambda',lam);
elseif length(lam)>nlin
    m.rbfpart= set(m.rbfpart,'lambda',lam(nlin+1));
else
    m.rbfpart= set(m.rbfpart,'lambda',0);
end
b = [Ball(1:size(m.linearmodpart,1)); allparameters(m.rbfpart)];