ttfig1.m

％ Atomizer Main Directory, Version .802 里面信号含有分解去噪合成过程的代码 ％---------------------------------------

% ttfig1: Tutorial Demo -- Atomizer Basics
%
fig_label=get(0,'Children');
for fi=1:prod(size(fig_label))
   if fi>2
      close (fig_label(fi));
   end
end

help ttfig1
disp('****************')
disp('Data Structures ')
disp(' ')
disp('There are 5 different data structures in Atomizer:')
disp('  (1) numbers')
disp('  (2) 1-d vectors')
disp('  (3) matrices')
disp('  (4) strings')
disp('  (5) lists')
disp('      See routines: MakeList, LengthList, NthList')
disp(' ')
disp('Atomic Decomposition:')
disp('  (1) 1-d Signals: column vectors')
disp('	    Use InputSignal to access Atomizer built-in Datasets')

disp('      E.g. Gong = InputSignal(''Gong'', 512);')

figure(1);clf
subplot(2,2,1);
n = 512; t = (1:n)' / n;
Carbon = InputSignal('Carbon', n);
plot(t, Carbon); title('Signal: Carbon')
subplot(2,2,2);
n = 512; t = (1:n)' / n;
Gong = InputSignal('Gong', n);
plot(t, Gong); title('Signal: Gong')
subplot(2,2,3);
Greasy = InputSignal('Greasy');
n = length(Greasy); t = (1:n)' / n;
plot(t, Greasy'); title('Signal: Greasy')
subplot(2,2,4);
Star = InputSignal('Star');
n = length(Star); t = (1:n)' / n;
plot(t, Star); title('Signal; Star')

disp('Press Any Key to Continue')
pause

disp('	(2) Coefficients: column vectors')
disp('  (3) Dictionaries: (NameOfDict, par1, par2, par3)')
disp('      NameOfDict -- string')
disp('	    par1, par2, par3 -- numbers or row vectors')
disp('	    ')
disp('	    Quadrature Mirror Filters: a parameter for wavelet dictionaries')
disp('        Orthogonal-Nearly Symmtric qmf: ')
disp('		qmf = MakeONFilter(''Symmlet'', 8);')
disp('	      Biorthogonal-Symmetric qmf:')
disp('	        [qmf  dqmf] = MakeONFilter(''CDF'', [3,9]);')

disp('Press Any Key to Continue')
pause

disp(' ')
disp('****************')
disp('Atomizer implements the following atomic deocomposition methods:')
disp('	Basis Pursuit (BP)')
disp('	the Method of Frames (MOF)')
disp('	Matching Pursuit (MP)')
disp('	Orthogonal Matching Pursuit (OMP)')
disp('	Best Orthogonal Basis (BOB)')
disp('The corresponding routines are:')
disp('	BP_Interior')
disp('	MOF')
disp('	MP')
disp('	OMP')
disp('	BOB')
disp('Calling Syntax ([] means optional):')
disp('	c = BP_Interior(x, NameOfDict, par1, par2, par3')
disp('               [, OptTol, FeaTol, CGAccuracy, MaxBPIter])')
disp('	c = MOF(x, NameOfDict, par1, par2, par3[, CGAccuracy])')
disp('	c = MP(x, NameOfDict, par1, par2, par3[, natom, frac])')
disp('	c = BOB(x, NameOfDict, par1, par2, par3[, entropy, par])')
disp(' ')
disp('Atoimzer also has (much slower) routines for dictionaries with ')
disp('dictionary matrices:')
disp('	c = BP_Simplex(x, F[, c0])')
disp('	c = MOF_Matrix(x, F)')
disp('	c = MP_Matrix(x, F[, natom, frac])')
disp('	c = OMP_Matrix(x, F[, natom, frac])')

disp('Press Any Key to Continue')
pause

disp(' ')
disp('****************')
disp('Atomizer implements the following atomic deocomposition methods:')
disp('	Basis Pursuit De-Noising (BPDN)')
disp('	Method-of-Frames De-Noising (MOFDN)')
disp('	Matching Pursuit De-Noising (MPDN)')
disp('	Best-Orthogonal-Basis De-Noising (BOBDN)')
disp('The corresponding routines are:')
disp('	BPDN_Interior')
disp('	MOFDN')
disp('	MPDN')
disp('	OMPDN')
disp('	BOBDN')
disp('Calling Syntax ([] means optional):')
disp('	[xrec, coef] = BPDN_Interior(y, NameOfDict, par1, par2, par3')
disp('                  [, BPAccuracy, CGAccuracy])')
disp('	[xrec, coef] = MOFDeNoise(y, NameOfDict, par1, par2, par3')
disp('                  [, lambda, CGAccuracy])')
disp('	[xrec, coef] = MPDN(y, NameOfDict, par1, par2, par3)')
disp('	[xrec, coef] = BOBDeNoise(y, NameOfDict, par1, par2, par3)')
disp(' ')
disp('Atoimzer also has (much slower) routines for dictionaries with ')
disp('dictionary matrices:')
disp('	[xrec, coef] = BPDeNoise_Simplex(y, F)')
disp(' ')