Mercurial > hg > smallbox
annotate DL/Majorization Minimization DL/ExactDicoRecovery/ksvd_exactRec_demo.m @ 163:855025f4c779 ivand_dev
renaiming small_cgp to small_pcgp
| author | Ivan Damnjanovic lnx <ivan.damnjanovic@eecs.qmul.ac.uk> |
|---|---|
| date | Wed, 07 Sep 2011 14:16:50 +0100 |
| parents | b14209313ba4 |
| children |
| rev | line source |
|---|---|
| ivan@155 | 1 function ksvd_exactRec_demo(it,k,sn) |
| ivan@155 | 2 tic |
| ivan@155 | 3 IT = it; |
| ivan@155 | 4 K = k; |
| ivan@155 | 5 SN = sn; |
| ivan@155 | 6 if SN<10, |
| ivan@155 | 7 samnum = ['0',num2str(SN)]; |
| ivan@155 | 8 else |
| ivan@155 | 9 samnum = num2str(SN); |
| ivan@155 | 10 end |
| ivan@155 | 11 load(['Param',num2str(K),'kS',samnum,'.mat']) |
| ivan@155 | 12 lambda = 2*.2; % 2 * Smallest coefficients (Soft Thresholding) |
| ivan@155 | 13 %%%%%%%%% |
| ivan@155 | 14 Phi = Phio; |
| ivan@155 | 15 M = size(Phi,1); |
| ivan@155 | 16 [Phi,unhat,ert] = ksvd_cn(x,Phi,lambda,IT); |
| ivan@155 | 17 |
| ivan@155 | 18 save(['KSVDl1',num2str(M),'t',num2str(IT),'ikiun',num2str(K),'v1d',num2str(SN),'.mat'],'Phi','Phid','x','ud','unhat','ert') |
| ivan@155 | 19 |
| ivan@155 | 20 toc |