function results_strategies_individual_evolution5
addpath(fullfile(fileparts(mfilename('fullpath')), '../extern/export_fig'));
addpath(fullfile(fileparts(mfilename('fullpath')), '../extern/cm_and_cb_utilities'));
addpath(fullfile(fileparts(mfilename('fullpath')), '../'));
% global data initialized elsewhere
global g_segments_classification;
global g_partitions;
global g_animals_ids;
global g_animals_trajectories_map;
global g_trajectories_length;
% classify trajectories
cache_animals;
cache_trajectories_classification;
figure;
% bins = [10, 15, 25, 40];
bins = repmat(2, 1, 45);
nbins = length(bins);
strat_distr = g_segments_classification.mapping_time(bins, 'DiscardUnknown', 1);
tmp = zeros(length(g_partitions), nbins);
tmp(g_partitions > 0, 1:nbins) = strat_distr;
tmp(g_partitions == 0, 1) = g_segments_classification.nclasses + 1;
tmp(g_partitions == 0, 2:nbins) = -1;
strat_distr = tmp;
% reduced plots
for s = 1:2
if s == 1
sel_trials = 1:6;
else
sel_trials = 7:12;
end
for g = 1:2
ids = g_animals_ids{g};
map = g_animals_trajectories_map{g};
clf;
distr = {[], [], [], []};
row_labels = {};
col_labels = {};
for t = 1:length(sel_trials)
trial = sel_trials(t);
col_labels = [col_labels, sprintf('trial %d', trial)];
distr{t} = strat_distr(map(trial, :), :);
end
row_labels = [row_labels, arrayfun( @num2str, ids, 'UniformOutput', 0)];
% reverse everything
for t = 1:length(sel_trials)
tmp = distr{t};
distr{t} = tmp(end:-1:1, :);
end
row_labels = row_labels(end:-1:1);
% plot_distribution_strategies(distr, 'Ordered', 1, 'Widths', bins, ...
% 'ColumnLabels', col_labels, ... %'RowLabels', row_labels, ...
% 'Ticks', [10, 50, 90], 'TicksLabels', {'10s', '50s', '90s'}, 'BarHeight', 0.25, 'AverageBarsHeight', 0);
% export_fig(fullfile(g_config.OUTPUT_DIR, sprintf('individual_strategies_g%d_s%d.eps', g, s)));
%
% clf;
% plot also a smaller plot with only the longest 12 animals
avg_len = mean(g_trajectories_length(map(1:6, :)), 1);
[~, ord] = sort(avg_len);
for t = 1:length(sel_trials)
tmp = distr{t};
distr{t} = tmp(ord(1:12), :);
end
plot_distribution_strategies(distr, 'Ordered', 1, 'Widths', bins, ...
'ColumnLabels', col_labels, ... %'RowLabels', row_labels, ...
'Ticks', [10, 50, 90], 'TicksLabels', {'10s', '50s', '90s'}, 'BarHeight', 0.8, 'AverageBarsHeight', 0, 'AspectRatio', 0.5);
export_fig(fullfile(g_config.OUTPUT_DIR, sprintf('individual_strategies_partial_g%d_s%d.eps', g, s)));
end
end
end