www.gusucode.com > 局部均值分解源代码 难得的matlab程序代码源码 > lmd/nengliang.m

    function p=nengliang(y)
% my=mean(y);
% p=(y-my).*(y-my);
% p=sum(p);
p=sum(abs(y).^2);
end