annotate DL/Majorization Minimization DL/ExactDicoRecovery/mapcn_exactRec_demo.m @ 228:198d4d9cee74
luisf_dev
Now can use a local configuration file, which is a copy of the default config files, and thus not being commited to the repository.
author |
luisf <luis.figueira@eecs.qmul.ac.uk> |
date |
Thu, 12 Apr 2012 15:06:41 +0100 |
parents |
b14209313ba4 |
children |
|
rev |
line source |
ivan@155
|
1 function mapcn_exactRec_demo(it,k,sn,cs)
|
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 if cs == 'bn'
|
ivan@155
|
14 res = 1;
|
ivan@155
|
15 elseif cs == 'un'
|
ivan@155
|
16 res = 2;
|
ivan@155
|
17 else
|
ivan@155
|
18 disp('Undefined dictionary admissible set.')
|
ivan@155
|
19 end
|
ivan@155
|
20 method = ['bn';'un'];
|
ivan@155
|
21 res = 2; % 1 for bounded-norm, 2 for unit-norm
|
ivan@155
|
22 %%%%%%%%%%%%%%
|
ivan@155
|
23 Phi = Phio;
|
ivan@155
|
24 M = size(Phi,1);
|
ivan@155
|
25 [Phi,unhat,ert] = mapdl_cn(x,Phi,lambda,IT,res);
|
ivan@155
|
26
|
ivan@155
|
27 save(['MAPl1',num2str(M),'t',num2str(IT),'iki',method(res,:),num2str(K),'v1d',num2str(SN),'.mat'],'Phi','Phid','x','ud','unhat','ert')
|
ivan@155
|
28
|
ivan@155
|
29 toc
|