elliphfilt.asv

来自「使用Matlab实现了FIR与IIR滤波器」· ASV 代码 · 共 32 行

function [ output_args ] = Untitled5( input_args )
%UNTITLED5 Summary of this function goes here
%  Detailed explanation goes here
[y,ft,bits]=wavread('hello.wav');
subplot(2,2,1);
plot(y);
xlabel('Time Index t');
ylabel('Amplitude');
title('原始时域图象');grid;
subplot(2,2,2);
plot(abs(fft(y)));
xlabel('Frequence Index w');
ylabel('Amplitude');
title('原始频域图象');grid;
Wpb=2*5000/ft;
Wsb=2*4800/ft;
Rp = 1;
Rs = 100;
[N,Wn] = ellipord(Wp,Ws,Rp,Rs);
[b,a] = ellip(N,Rp,Rs,Wn,'high');
v=filter(b,a,y);
subplot(2,2,3);
plot(v);
xlabel('Time Index t');
ylabel('Amplitude');
title('ELLIP高通滤波时域图象');
subplot(2,2,4);
plot(abs(fft(vl)));
xlabel('Frequence Index w');
ylabel('Amplitude');
title('高通滤波后频域图象');grid;
sound(v,ft,bits);