共振峰提取 Matlab程序

此程序是我编写的Matlab程序，提取的效果和Praat很接近，有需要的可以下载

clc;
clear;
fid=fopen（‘data‘‘wb‘）; %wav文件的源文件列表
sampleSize=4*（3+13）

parmKind=9;

fwrite（fidsampleSize‘int16‘‘b‘）;
fwrite（fidparmKind‘int16‘‘b‘）;
fclose（fid）;
disp（‘Finish‘）;

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

     文件      19200  2009-06-28 12:31  formant_extract\a_1.mfc

     文件      40058  2009-06-28 12:31  formant_extract\a_1.wav

     文件          4  2009-06-28 12:31  formant_extract\data

     文件        199  2009-06-28 12:31  formant_extract\data.m

     文件      55724  2009-06-28 12:31  formant_extract\e.wav

     文件       1165  2009-06-28 12:31  formant_extract\find_peak.m

     文件       2116  2009-06-28 12:31  formant_extract\fmt_differ.m

     文件       1120  2009-06-28 12:31  formant_extract\formant_get.m

     文件       1848  2009-06-28 12:31  formant_extract\main.m

     文件       1993  2009-06-28 12:31  formant_extract\my program\fmt_div_log.m

     文件       1879  2009-06-28 12:31  formant_extract\my program\fmt_log.m

     文件       1983  2009-06-28 12:31  formant_extract\my program\fmt_log_div.m

     文件       1993  2009-06-28 12:31  formant_extract\non_differ\fmt_div_log.m

     文件       2181  2009-06-28 12:31  formant_extract\non_differ\fmt_div_log0.m

     文件       2089  2009-06-28 12:31  formant_extract\non_differ\fmt_div_log0_fir.m

     文件       1980  2009-06-28 12:31  formant_extract\non_differ\fmt_div_log_fir.m

     文件       1879  2009-06-28 12:31  formant_extract\non_differ\fmt_log.m

     文件       1983  2009-06-28 12:31  formant_extract\non_differ\fmt_log_div.m

     文件       1993  2009-06-28 12:31  formant_extract\non_differ\fmt_log_div0.m

     文件       3667  2009-06-28 12:31  formant_extract\pick_peak.m

     文件       1285  2009-06-28 12:31  formant_extract\pre.m

     文件     369881  2009-06-28 12:31  formant_extract\scp\fmt0_all.scp

     文件         43  2009-06-28 12:31  formant_extract\scp\fmt0_part.scp

     文件     352241  2009-06-28 12:31  formant_extract\scp\fmt_all.scp

     文件        123  2009-06-28 12:31  formant_extract\scp\fmt_part.scp

     文件     387521  2009-06-28 12:31  formant_extract\scp\lfmt0_all.scp

     文件         90  2009-06-28 12:31  formant_extract\scp\lfmt0_part.scp

     文件     369881  2009-06-28 12:31  formant_extract\scp\lfmt_all.scp

     文件         86  2009-06-28 12:31  formant_extract\scp\lfmt_part.scp

     文件       2599  2009-06-28 12:31  formant_extract\scp\try.scp

............此处省略11个文件信息