www.gusucode.com > wavelet工具箱matlab源码程序 > wavelet/wmultisig1d/wmuldentoolmonab.m
function varargout = wmuldentoolmonab(varargin) % WMULDENTOOLMONAB MATLAB file for wmuldentoolmonab.fig % Called by WMULDENTOOL (More On Adapted Basis). % Last Modified by GUIDE v2.5 11-Jul-2013 17:57:54 % % M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 06-Jan-2006. % Last Revision: 25-Jan-2012. % Copyright 1995-2012 The MathWorks, Inc. % $Revision: 1.1.6.6 $ $Date: 2013/08/23 23:46:10 $ % Begin initialization code - DO NOT EDIT gui_Singleton = 1; gui_State = struct('gui_Name', mfilename, ... 'gui_Singleton', gui_Singleton, ... 'gui_OpeningFcn', @wmuldentoolmonab_OpeningFcn, ... 'gui_OutputFcn', @wmuldentoolmonab_OutputFcn, ... 'gui_LayoutFcn', [] , ... 'gui_Callback', []); if nargin && ischar(varargin{1}) gui_State.gui_Callback = str2func(varargin{1}); end if nargout [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:}); else gui_mainfcn(gui_State, varargin{:}); end % End initialization code - DO NOT EDIT %-------------------------------------------------------------------------- function wmuldentoolmonab_OpeningFcn(hObject,~,handles,varargin) % This function has no output args, see OutputFcn. % hObject handle to figure % Choose default command line output for wmuldentoolmonab handles.output = hObject; % Update handles structure guidata(hObject,handles); %%!!!!!!!!!!!!!!!!!!!!% % TOOL INITIALISATION % %%!!!!!!!!!!!!!!!!!!!!% callingFIG = gcbf; wfigmngr('init_called_FIG',hObject); set(hObject,'Name',getWavMSG('Wavelet:mdw1dRF:Pus_More_Nois_ADAP')); uic = wfindobj(hObject,'Type','uicontrol'); txt = wfindobj(uic,'Tag','Pus_Close'); set(txt,'String',getWavMSG('Wavelet:commongui:Str_Close')); txt = wfindobj(uic,'Tag','Txt_Eig_VAL'); set(txt,'String',getWavMSG('Wavelet:mdw1dRF:Eigenvalues')); txt = wfindobj(uic,'Tag','Txt_Eig_VECT'); set(txt,'String',getWavMSG('Wavelet:mdw1dRF:Eigenvectors')); txt = wfindobj(uic,'Tag','Txt_Robust'); set(txt,'String',getWavMSG('Wavelet:mdw1dRF:Txt_Robust')); pus_MORE = varargin{1}; [pc,variances,cov_est] = deal(varargin{2}{:}); posCaller = get(callingFIG,'Position'); posLocFig = get(hObject,'Position'); posLocFig(1) = posCaller(1) + 0.025; posLocFig(2) = posCaller(2)+(posCaller(4) - posLocFig(4))/2; set(hObject,'Position',posLocFig,'UserData',pus_MORE); set(handles.Axe_ALL,'XTick',[],'YTick',[],'Visible','On') load('wmuldenpcamoab_img') image(Xsigma,'Parent',handles.Axe_Sigma); image(Xeigenv,'Parent',handles.Axe_EigenV); image(Xlambda,'Parent',handles.Axe_Lambda); image(Xsigmacov,'Parent',handles.Axe_SigmaVAL); set([handles.Axe_Sigma,handles.Axe_EigenV,handles.Axe_Lambda],... 'XTick',[],'YTick',[],'Visible','Off') set(handles.Axe_SigmaVAL,'XTick',[],'YTick',[],'Visible','On') nbVAL = length(variances); switch nbVAL case 5 , FontSize = 10; case {6,7,8} , FontSize = 8; otherwise , FontSize = 10; end formatNUM = '%9.4f'; set(handles.Txt_VARESTI,'FontSize',FontSize,... 'String',num2str(cov_est,formatNUM)); set(handles.Txt_EigVAL_VAL,'FontSize',FontSize,... 'String',num2str(variances,formatNUM)); set(handles.Txt_EIGVect_VAL,'FontSize',FontSize,... 'String',num2str(pc,formatNUM)); %-------------------------------------------------------------------------- function varargout = wmuldentoolmonab_OutputFcn(~,~,handles) % Get default command line output from handles structure varargout{1} = handles.output; %-------------------------------------------------------------------------- function Pus_Close_Callback(~,~,handles) %#ok<*DEFNU> fig = handles.output; wmuldentool('Pus_More_ADAP_Callback',fig,[],handles) %--------------------------------------------------------------------------