annotate PeakInterpolator.cpp @ 75:84d1a0647ce5 tip

Split out COPYING from README
author Chris Cannam
date Fri, 06 Mar 2020 11:01:53 +0000
parents c5cd88de5809
children
rev   line source
Chris@39 1 /* -*- c-basic-offset: 4 indent-tabs-mode: nil -*- vi:set ts=8 sts=4 sw=4: */
Chris@39 2 /*
Chris@39 3 This file is Copyright (c) 2012 Chris Cannam
Chris@39 4
Chris@39 5 Permission is hereby granted, free of charge, to any person
Chris@39 6 obtaining a copy of this software and associated documentation
Chris@39 7 files (the "Software"), to deal in the Software without
Chris@39 8 restriction, including without limitation the rights to use, copy,
Chris@39 9 modify, merge, publish, distribute, sublicense, and/or sell copies
Chris@39 10 of the Software, and to permit persons to whom the Software is
Chris@39 11 furnished to do so, subject to the following conditions:
Chris@39 12
Chris@39 13 The above copyright notice and this permission notice shall be
Chris@39 14 included in all copies or substantial portions of the Software.
Chris@39 15
Chris@39 16 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
Chris@39 17 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
Chris@39 18 MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
Chris@39 19 NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR
Chris@39 20 ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
Chris@39 21 CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
Chris@39 22 WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
Chris@39 23 */
Chris@39 24
Chris@39 25 #include "PeakInterpolator.h"
Chris@39 26
Chris@40 27 #include <iostream>
Chris@40 28
Chris@39 29 double
Chris@42 30 PeakInterpolator::findPeakLocation(const double *data, int size)
Chris@42 31 {
Chris@42 32 double maxval;
Chris@42 33 int maxidx = 0;
Chris@42 34 int i;
Chris@42 35 for (i = 0; i < size; ++i) {
Chris@42 36 if (i == 0 || data[i] > maxval) {
Chris@42 37 maxval = data[i];
Chris@42 38 maxidx = i;
Chris@42 39 }
Chris@42 40 }
Chris@42 41 return findPeakLocation(data, size, maxidx);
Chris@42 42 }
Chris@42 43
Chris@42 44 double
Chris@39 45 PeakInterpolator::findPeakLocation(const double *data, int size, int peakIndex)
Chris@39 46 {
Chris@43 47 // after jos,
Chris@43 48 // https://ccrma.stanford.edu/~jos/sasp/Quadratic_Interpolation_Spectral_Peaks.html
Chris@40 49
Chris@40 50 if (peakIndex < 1 || peakIndex > size - 2) {
Chris@39 51 return peakIndex;
Chris@39 52 }
Chris@39 53
Chris@43 54 double alpha = data[peakIndex-1];
Chris@43 55 double beta = data[peakIndex];
Chris@43 56 double gamma = data[peakIndex+1];
Chris@39 57
Chris@43 58 double denom = (alpha - 2*beta + gamma);
Chris@39 59
Chris@43 60 if (denom == 0) {
Chris@43 61 // flat
Chris@43 62 return peakIndex;
Chris@39 63 }
Chris@39 64
Chris@43 65 double p = ((alpha - gamma) / denom) / 2.0;
Chris@39 66
Chris@43 67 return double(peakIndex) + p;
Chris@39 68 }
Chris@39 69