function number_cells = NumCellsExtractor(strain_name,dataset, position,show_results)

if ~exist('show_results','var')
    show_results = false;
end

load([strain_name num2str(dataset) '_' num2str(position) '_emb1_fullmatlabresult.mat'])

num_time_points = size(esequence,2);

number_cells = zeros(1,num_time_points);

x_axis = 01:num_time_points;

for i = 1:num_time_points
number_cells(i) = size(esequence{1,i}.finalpoints,1);
end

if show_results
figure()
plot(x_axis,number_cells)
title(['Position ' num2str(position)])
end