代码搜索结果

function[Hr,w,b,L]=hr_type2(h) M=length(h); L=M/2; b=2*[h(L:-1:1)]; n=[1:1:L];n=n-0.5; w=[0:1:500]'*2*pi/500; Hr=cos(w*n)*b';

%a08.m N=200;n=0:1:N-1; xn=sin(5/99*pi*n); subplot(3,1,1);stem(n,xn); Xk=dft(xn,N); magXk=abs(Xk); k=(0:length(magXk)'-1)*N/length(magXk); subplot(3,1,2);stem(k,magXk); phaXk=angle(Xk)*180/pi;

function[Hr,w,c,L]=hr_type3(h); M=length(h); L=(M-1)/2; c=[2*h(L+1:-1:1)]; n=[0:1:L]; w=[0:1:500]'*2*pi/500; Hr=sin(w*n)*c';

%a22.m wp=0.2*pi;wr=0.3*pi;Ap=1;Ar=15; T=1; Omegap=(2/T)*tan(wp/2);Omegar=(2/T)*tan(wr/2); ep=sqrt(10^(Ap/10)-1); Ripple=sqrt(1/(1+ep*ep)); Attn=1/(10^(Ar/20)); %双线性变换法设计Chebshev 2型数字低通滤波器 [cs

function[Xk]=dfs(xn,N) n=[0:1:N-1]; k=[0:1:N-1]; WN=exp(-j*2*pi/N); nk=n'*k; WNnk=WN.^nk; Xk=xn*WNnk;

%a20.m wp=0.2*pi;wr=0.4*pi;Ap=3;Ar=20; T=1; Omegap=(2/T)*tan(wp/2);Omegar=(2/T)*tan(wr/2); ep=sqrt(10^(Ap/10)-1); Ripple=sqrt(1/(1+ep*ep)); Attn=1/(10^(Ar/20)); %双线性变换法设计Butterworth数字低通滤波器 [cs

function[Hr,w,a,L]=hr_type1(h); M=length(h); L=(M-1)/2; a=[h(L+1) 2*h(L:-1:1)]; n=[0:1:L]; w=[0:1:500]'*2*pi/500; Hr=cos(w*n)*a';

function hd=ideal_lp(wc,M); alpha=(M-1)/2; n=[0:1:(M-1)]; m=n-alpha+eps; hd=sin(wc*m)./(pi*m);

%a26.m M=21;alpha=(M-1)/2;l=0:M-1;wl=(2*pi/M)*l; Hrs=[1,1,1,1,zeros(1,13),1,1,1,1]; Hdr=[1,1,0,0];wdl=[0,0.35,0.35,1]; k1=0:floor((M-1)/2);k2=floor((M-1)/2)+1:M-1; angH=[-alpha*(2*pi)/M*(k1+0.5),

function[Xk]=dft(xn,N) n=[0:1:N-1]; k=[0:1:N-1]; WN=exp(-j*2*pi/N); nk=n'*k; WNnk=WN.^nk; Xk=xn*WNnk;