yinpincaijijiquzao.txt
上传用户:yinyong098
上传日期:2021-03-30
资源大小:1k
文件大小:2k
源码类别:

Audio

开发平台:

Matlab

  1. 我要用matlab分析蟋蟀的声音,同时做出其声音几个参数(频率,声音间隔,周期)的图像,在matlab中能实现吗?
  2. 怎样实现的??
  3. 还有,我用mp3录下了蟋蟀的叫声,但其中有些杂音,能去掉吗?重要的是我该怎样导入声音文件?
  4. 在matlab中可以改变声音的一些参数进行声音的回放吗?
  5. 烦请高手指点!!!不胜感激!!! 
  6. 提问者: xiaohuasdf - 一级
  7. 最佳答案
  8. 1)用mp3录音,生成文件cricket.wav,把该文件放到matlab文件夹里面(就是你打开matlab后中间顶部的地址)。
  9. 2)使用如下程序,做波形显示以及fft变换。
  10. [y,Fs,bits]=wavread('cricket.wav');%读出信号,采样率和采样位数。
  11. y=y(:,1);%我这里假设你的声音是双声道,我只取单声道作分析,如果你想分析另外一个声道,请改成y=y(:,2)
  12. sigLength=length(y);
  13. Y = fft(y,sigLength);
  14. Pyy = Y.* conj(Y) / sigLength;
  15. halflength=floor(sigLength/2);
  16. f=Fs*(0:halflength)/sigLength;
  17. figure;plot(f,Pyy(1:halflength+1));xlabel('Frequency(Hz)');
  18. t=(0:sigLength-1)/Fs;
  19. figure;plot(t,y);xlabel('Time(s)');
  20. 3)频率看频谱就有了,声音间隔看声音波形,周期看声音波形。
  21. 4)关于去噪声。
  22. a)如果噪声是特定频率的周期噪声(periodic noise),比如说50hz,那么你可以用matlab的filter,作一个低通、高通、带通或者带阻滤波。
  23. b)如果声音是高斯白噪声。那就用自适应滤波(adaptive filter,wiener filter)。这里涉及到对噪声的采样、计算特征值以及决定阶数的问题。
  24. c)幸好我们可以“耍赖”——用cool editor。用它打开wav文件,用鼠标把一段噪声圈起来,采样,然后直接选择去噪就可以了。各大网站有介绍。
  25. 例子:matlab去除50hz噪声。
  26. 我用电脑录了一段声音,里面有50hz的周期噪声(因为受交流电干扰)。而我自己的声音频率最低是90hz。我使用了一个10阶butterworth高通滤波器,边带是70hz(介于50跟90之间)。
  27. 问题是,这不能直接用。因为声音文件的采样率是22k,70相对于22k来说太小了。所以我得先把我的声音欠采样,然后再滤波,然后再插值。程序如下。
  28. [k,Fs,bits]=wavread('mywav.wav');
  29. k=k(:,1);
  30. y_temp=k(1:90000);
  31. dfactor=3;
  32. y=decimate(y_temp,dfactor);
  33. [b,a] = butter(10,70/(Fs/(dfactor*2)),'high');
  34. y=filter(b,a,y);
  35. y=interp(y,dfactor);
  36. sigLength=length(y);
  37. Y = fft(y,sigLength);
  38. Pyy = Y.* conj(Y) / sigLength;
  39. halflength=floor(sigLength/2);
  40. f=Fs*(0:halflength)/sigLength;
  41. figure;plot(f,Pyy(1:halflength+1));xlabel('Frequency(Hz)');
  42. sigLength=length(y_temp);
  43. Y = fft(y_temp,sigLength);
  44. Pyy = Y.* conj(Y) / sigLength;
  45. halflength=floor(sigLength/2);
  46. f=Fs*(0:halflength)/sigLength;
  47. figure;plot(f,Pyy(1:halflength+1));xlabel('Frequency(Hz)');
  48. t=(0:sigLength-1)/Fs;
  49. figure;plot(t,y,t,y_temp);xlabel('Time(s)');
  50. wavplay(y,Fs);
  51. wavplay(y_temp,Fs);
  52. 5)回放:使用wavplay函数
  53. wavplay(y,Fs); 
  54.  21