findpeaks.m

来自「Hilbert Huang Transform 绝对可用 性能超强哦:)」· M 代码 · 共 8 行

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;