lin_evol_opt_calculate_average_base_size.m

function sumN = lin_evol_opt_calculate_average_base_size(reduced_data)

 part_used = 1:length(reduced_data.parts_reduced_data);
        
        sumN=[0,0,0];
        
        nr_tparts = length(reduced_data.parts_reduced_data{part_used(1)}.t_part_reduced_data);
        for i=1:length(part_used)
            rd=reduced_data.parts_reduced_data{part_used(i)};
            for j=1:length(rd.t_part_reduced_data)
                sumN(1) = sumN(1)+rd.t_part_reduced_data{j}.N;
                sumN(2) = sumN(2)+length(rd.t_part_reduced_data{j}.c0{1}{1});
                sumN(3) = sumN(3)+length(rd.t_part_reduced_data{j}.c0{2}{1});
            end
        end
        
        N=size(part_used,2)*nr_tparts;
        sumN = sumN./N;
        
        disp(['Durchschnittliche Basenzahl: ',num2str(sumN)]);