www.gusucode.com > mbcmodels 工具箱 matlab 源码程序 > mbcmodels/@xreglinear/get.m
function Value=get(m,Property) %GET % Copyright 2000-2007 The MathWorks, Inc. and Ford Global Technologies, Inc. if nargin==1; Value= [{'status','store','order','lamda', 'qr', 'pev'}'; get(m.xregmodel)]; else switch lower(Property) case 'status' Value= m.TermStatus; case 'store' Value= m.Store; case 'order' Value= ones(1,nfactors(m)); case 'lambda' Value= m.lambda; case 'qr' Value= m.qr; case 'pev' Value= calcRi(m); if ~isempty(m.Store.mse) Value= sqrt(m.Store.mse)*Value; end otherwise try Value= get(m.xregmodel,Property); catch error(message('mbc:xreglinear:InvalidProperty', Property)); end end end