resample 重采样（升采样、降采样）

重采样（升采样、降采样），含测试音频文件，大家一起交流下，谢谢

%%down resample
%----44kHz->8kHz------------------------------------%
%clc;clear;


function resample_signal=down_resample（input_signal）

Fs=8000;%

resample_signal=zeros（2*length（input_signal）1）;
for i=1:length（input_signal）
    resample_signal（2*i-1）=input_signal（i）;%%44kHz->88kHz
end

N=240;
Fc=Fs/2;
Wn=Fc/44000;
b=fir1（NWn）;

resample_signal1=conv（resample_signal2.*b）;

for j=1:floor（length（resample_signal1）/11）
    resample_signal2（j）=resample_signal1（1+11*（j-1））;%%88kHz->8kHz
end

figure（1）;
pwelch（input_signal[][][]88000‘twosided‘）;
title（‘input signal at 44kHz‘）;

figure（2）;
pwelch（resample_signal1[][][]88000‘twosided‘）;
title（‘resample_signal at 88kHz after fir1‘）;

figure（3）;
pwelch（resample_signal2[][][]88000‘twosided‘）;
title

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      89132  2013-04-03 10:31  重采样\8kHz signal.wav

     文件       1546  2013-04-03 10:19  重采样\down_resample.m

     文件        320  2013-04-09 10:59  重采样\main_run.m

     文件     143438  2013-04-09 10:57  重采样\resample_44kHz.wav

     文件     143762  2013-04-09 11:02  重采样\resample_44_1kHz.wav

     文件       1562  2013-04-03 10:44  重采样\up_resample.m

     文件       1817  2013-04-09 11:04  重采样\up_resample_line_inner.m

     目录          0  2013-04-09 12:47  重采样

----------- ---------  ---------- -----  ----

               381577                    8