www.gusucode.com > mbcmodels 工具箱 matlab 源码程序 > mbcmodels/@xregtwostage/RidgeMatrix.m
function lam= RidgeMatrix(TS); % RIDGEMATRIX % Copyright 2000-2004 The MathWorks, Inc. and Ford Global Technologies, Inc. if islinear(TS) for i=1:length(TS.Global); lam{i}= RidgeMatrix(TS.Global{i}); end lam= spblkdiag(lam{:}); if nnz(lam)==0 lam=0; end else lam=0; end