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
|