Mercurial > hg > smallbox
annotate DL/Majorization Minimization DL/ExactDicoRecovery/modcn_exactRec_demo.m @ 243:1fbd28dfb99e unlocbox
setup file
| author | bmailhe |
|---|---|
| date | Wed, 29 Aug 2012 10:39:14 +0100 |
| parents | b14209313ba4 |
| children |
| rev | line source |
|---|---|
| ivan@155 | 1 function modcn_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] = mod_cn(x,Phi,lambda,IT); |
| ivan@155 | 17 |
| ivan@155 | 18 save(['MODl1',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 |