資源簡(jiǎn)介
《MATLAB在語(yǔ)音信號(hào)分析與合成中的應(yīng)用》的隨書代碼,

代碼片段和文件信息
function?[signalnoise]=add_noisedata(sdatafsfs1snr)
s=s(:);??????????????????????????%?把信號(hào)轉(zhuǎn)換成列數(shù)據(jù)
s=s-mean(s);?????????????????????%?消除直流分量
sL=length(s);????????????????????%?求出信號(hào)的長(zhǎng)度
if?fs~=fs1???????????????????????%?若純語(yǔ)音信號(hào)的采樣頻率與噪聲的采樣頻率不相等
????x=resample(datafsfs1);?????%?對(duì)噪聲重采樣,使噪聲采樣頻率與純語(yǔ)音信號(hào)的采樣頻率相同
else
????x=data;
end
x=x(:);??????????????????????????%?把噪聲數(shù)據(jù)轉(zhuǎn)換成列數(shù)據(jù)
x=x-mean(x);?????????????????????%?消除直流分量
xL=length(x);????????????????????%?求噪聲數(shù)據(jù)長(zhǎng)度
if?xL>=sL????????????????????????%?如果噪聲數(shù)據(jù)長(zhǎng)度與信號(hào)數(shù)據(jù)長(zhǎng)度不等,把噪聲數(shù)據(jù)截?cái)嗷蜓a(bǔ)足
????x=x(1:sL);
else
????disp(‘Warning:?噪聲數(shù)據(jù)短于信號(hào)數(shù)據(jù),以補(bǔ)0來(lái)補(bǔ)足!‘)
????x=[x;?zeros(sL-xL1)];
end
Sr=snr;
Es=sum(x.*x);????????????????????%?求出信號(hào)的能量
Ev=sum(s.*s);????????????????????%?求出噪聲的能量
a=sqrt(Ev/Es/(10^(Sr/10)));??????%?計(jì)算出噪聲的比例因子
noise=a*x;???????????????????????%?調(diào)整噪聲的幅值
signal=s+noise;??????????????????%?構(gòu)成帶噪語(yǔ)音
?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2018-09-30?20:18??20131118mlyy\
?????文件????????6238??2018-09-30?15:39??20131118mlyy\content.txt
?????文件???????24449??2018-09-30?15:39??20131118mlyy\cover.jpg
?????文件?????????997??2018-09-30?15:39??20131118mlyy\ILMBookController.p
?????文件?????????100??2018-09-30?15:39??20131118mlyy\ILMBookModel.p
?????文件????????2148??2018-09-30?15:39??20131118mlyy\ILMBookView.p
?????文件?????????510??2018-09-30?15:39??20131118mlyy\main.p
?????目錄???????????0??2018-09-30?20:18??20131118mlyy\program\
?????目錄???????????0??2018-09-30?20:18??20131118mlyy\program\basic_tbx\
?????文件????????1050??2018-09-30?15:39??20131118mlyy\program\basic_tbx\add_noisedata.m
?????文件????????1010??2018-09-30?15:39??20131118mlyy\program\basic_tbx\add_noisefile.m
?????文件????????2895??2018-09-30?15:39??20131118mlyy\program\basic_tbx\enfr
?????文件????????4242??2018-09-30?15:39??20131118mlyy\program\basic_tbx\findpeaks.m
?????文件?????????753??2018-09-30?15:39??20131118mlyy\program\basic_tbx\findSegment.m
?????文件?????????110??2018-09-30?15:39??20131118mlyy\program\basic_tbx\fr
?????文件?????????234??2018-09-30?15:39??20131118mlyy\program\basic_tbx\freqz_m.m
?????文件????????2535??2018-09-30?15:39??20131118mlyy\program\basic_tbx\frq2mel.m
?????文件?????????645??2018-09-30?15:39??20131118mlyy\program\basic_tbx\Gnoisegen.m
?????文件?????????136??2018-09-30?15:39??20131118mlyy\program\basic_tbx\ideal_lp.m
?????文件????????2931??2018-09-30?15:39??20131118mlyy\program\basic_tbx\instfreq.m
?????文件?????????564??2018-09-30?15:39??20131118mlyy\program\basic_tbx\linsmoothm.m
?????文件????????1315??2018-09-30?15:39??20131118mlyy\program\basic_tbx\lpcar2ff.m
?????文件????????1441??2018-09-30?15:39??20131118mlyy\program\basic_tbx\lpcar2pf.m
?????文件????????1307??2018-09-30?15:39??20131118mlyy\program\basic_tbx\lpcar2zz.m
?????文件????????2525??2018-09-30?15:39??20131118mlyy\program\basic_tbx\mel2frq.m
?????文件???????11383??2018-09-30?15:39??20131118mlyy\program\basic_tbx\melbankm.m
?????文件????????1585??2018-09-30?15:39??20131118mlyy\program\basic_tbx\Mtmpsd_ssb.m
?????文件????????1663??2018-09-30?15:39??20131118mlyy\program\basic_tbx\OverlapAdd2.m
?????文件????????1352??2018-09-30?15:39??20131118mlyy\program\basic_tbx\pitch_vad1.m
?????文件????????2358??2018-09-30?15:39??20131118mlyy\program\basic_tbx\pitch_vads.m
?????文件?????????398??2018-09-30?15:39??20131118mlyy\program\basic_tbx\pitfilterm1.m
............此處省略354個(gè)文件信息
評(píng)論
共有 條評(píng)論