hr_type4.m

原名：数字信号处理基础及MATLAB实现,解压缩密码：[e-mail]

function [Hr,w,d,L]=hr_type4(h);
%线性相位滤波器类型4，计算滤波器振幅响应
%Hr振幅响应；w在[0,2pi]之间计算Hr的500个频率点；
%d为4型低通滤波器系数；L为Hr的阶次；h为4型低通滤波器的脉冲响应。
M=length(h);L=M/2;
d=2*[h(L:-1:1)];            %1乘(L+1)行向量
n=[1:1:L];n=n-0.5;          %(L+1)乘1列向量
w=[0:1:500]'*2*pi/500;
Hr=sin(w*n)*d';