analytic.m

来自「斯坦福大学的小波的工具箱 比matlab自带的工具箱更完善」· M 代码 · 共 29 行

function g = Analytic(f);
%
% Takes the Analytic part of signal f
%
	f0 = f;
	f    = f(:);	
	N    = length(f);
	hatf = fft(f);
	hatg = zeros(N,1);
	hatg(1) = hatf(1);
	hatg(2:N/2) = 2*hatf(2:N/2);
	hatg(N/2+1) = hatf(N/2+1);
	g = ifft(hatg);
        
%	g = ShapeLike(g,f0);

% Written by Maureen Clerc and Jerome Kalifa, 1997
% [e-mail], [e-mail]
    
    
%   
% Part of WaveLab Version 802
% Built Sunday, October 3, 1999 8:52:27 AM
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%