bandwindow.m

来自「beamlet变化的工具箱」· M 代码 · 共 44 行

function w = BandWindow(r,deg,typ)
%  BandWindow: Construct array for windowing specified corona
%  Usage
%       w = BandWindow(r,deg)
%  Inputs
%   r   array of values, the ones between 1/2 and 2 matter
%       deg     degree of window polynomial
%       typ     string; type of filter: bandpass, lowpass, highpass
%  Outputs
%       w       window smoothly tending from zero outside band to 1 inside band
%
        w = 0 .* r;
        switch typ
                case 'bandpass',
                w = w + (1/2 <=r ).* (r <= 1) .* WindowMeyer(2*(r-.5),3);
                w = w + (1 < r) .* ( r <= 2)  .* WindowMeyer((2-r),3);
                case 'lowpass',
                w = w + (r <= 1) ; ...
                w = w + (1 < r) .* ( r <= 2)  .* WindowMeyer((2-r),3);
                case 'highpass',
                w = w + (1/2 <=r ).* (r <= 1) .* WindowMeyer(2*(r-.5),3);
                w = w + (1 < r);
        end
        w = sin((pi/2) .* w);
%


% Copyright (c) 2000 David L. Donoho


%
% Part of BeamLab Version:200
% Built:Friday,23-Aug-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%
%
% Part of BeamLab Version:200
% Built:Saturday,14-Sep-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%