maxima.m

来自「％ Atomizer Main Directory, Version .802 」· M 代码 · 共 17 行

function y = Maxima(x)
% Purpose: to find the maxima of x
% Usage:
%	y = Maxima(x)
%
%

n = length(x);
y = zeros(size(x));

for i = 2:(n-1),
	MAX = x(i) > x(i-1) & x(i) > x(i+1);
	if MAX,
		y(i) = x(i);
	end
end