39 lines
1.5 KiB
Matlab
39 lines
1.5 KiB
Matlab
|
|
%TODO: Find false detected peaks. This could be a not detected or an additional detected peak. Simple algorithm:
|
|
% 1) Choose smallest diff(peaks) value smallest_peak (e.g. 48, 97, 49, [45], ..)
|
|
% 2) Divide all diff_peaks values with smallest_peak to get factor_peaks (e.g. 1.1, 1.8, 1.2, 1, ..) and to whole numbers (e.g. 1, [2], 1, 1, ..)
|
|
% 3) Divide diff_peaks / factor_peaks and split (e.g. 48, [48.5, 48.5], 49, 45, ..) diff_peaks_new
|
|
% 4) Start at first peak and cumsum the correlation values at the lag positions given by diff_peaks_new to sum_peaks_new and sum_peaks for diff_peaks
|
|
% 5) If sum_diff_new > sum_diff finish, else remove smallest_peak from diff(peaks) and goto 1)
|
|
function idx = findFalseDetectedPeaks(idx_orig, lag_orig, corr_orig)
|
|
|
|
idx = idx_orig;
|
|
do
|
|
%1
|
|
diff_peaks = diff(lag_orig(idx_orig));
|
|
[smallest_peak, smallest_peak_idx] = min(diff_peaks);
|
|
|
|
%2
|
|
factor_peaks = round(diff_peaks / smallest_peak);
|
|
|
|
%3
|
|
factor_matrix = [1:length(factor_peaks); factor_peaks]; %we need this since octave doesn't have a repelem only repelemS.
|
|
diff_peaks_new = repelems(diff_peaks ./ factor_peaks, factor_matrix);
|
|
|
|
%4
|
|
idx_new = round([idx_orig(1), cumsum(diff_peaks_new) + idx_orig(1)]');
|
|
sum_peaks_new = sum(corr_orig(idx_new));
|
|
sum_peaks = sum(corr_orig(idx_orig));
|
|
|
|
%5
|
|
if(sum_peaks_new < sum_peaks)
|
|
idx_orig(smallest_peak_idx + 1) = [];
|
|
else
|
|
idx = idx_new;
|
|
endif
|
|
|
|
until (sum_peaks_new < sum_peaks || length(idx_orig) > 1)
|
|
%TODO: Warning: could this be an infinite loop?
|
|
|
|
end
|