a b/functions/stampaAvgCMC.m
1
function stampaAvgCMC(cmc, titleS, dirResults, savefile, plotta)
2
3
padExtra = 30;
4
maxSize = -1;
5
for c = 1 : numel(cmc)
6
    sizeCmc = numel(cmc{c});
7
    if sizeCmc > maxSize
8
        maxSize = sizeCmc;
9
    end %if sizeCmc
10
end %for c
11
%init
12
cmcMean = zeros(padExtra, 1);
13
%-pad to max size
14
for c = 1 : numel(cmc)
15
    cmcMean = cmcMean + padarray(cmc{c}, padExtra-numel(cmc{c}), 1, 'post');
16
end %for c
17
%-average
18
cmcMean = cmcMean ./ numel(cmc);
19
%-plot
20
if plotta
21
    fsfigure;
22
    fs = 24;
23
    plot(cmcMean, 'r-h', 'linewidth', 2, 'Markersize', 15);
24
    xlabel('Rank', 'fontsize', fs)
25
    ylabel('Identification Rate (%)', 'fontsize',fs)
26
    grid on
27
    title(titleS, 'fontsize', fs)
28
    hold on
29
    set(gca, 'fontsize', fs)
30
    set(gcf, 'color', 'w');
31
    axis([0 padExtra 0.80 1]);
32
    %save
33
    if savefile
34
        export_fig(gcf, [dirResults 'cmc_' titleS '.jpg']);
35
    end %if save
36
end %if plot