Hilbert-Huang Transform: findpeaks(x) - File Exchange

No BSD License

from Hilbert-Huang Transform by Alan Tan
This submission is a realization of the Hilbert-Huang transform (HHT).

findpeaks(x)
function n = findpeaks(x) % Find peaks. % n = findpeaks(x) n = find(diff(diff(x) > 0) < 0); u = find(x(n+1) > x(n)); n(u) = n(u)+1;