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