91av视频/亚洲h视频/操亚洲美女/外国一级黄色毛片 - 国产三级三级三级三级

  • 大小: 643KB
    文件類型: .rar
    金幣: 2
    下載: 0 次
    發(fā)布日期: 2021-05-12
  • 語(yǔ)言: Matlab
  • 標(biāo)簽: 語(yǔ)音識(shí)別??

資源簡(jiǎn)介

基于MATLAB實(shí)現(xiàn)的說(shuō)話人識(shí)別程序,分別用bp、pnn、som、rbf、lvq等算法

資源截圖

代碼片段和文件信息


clear;
num=15;

disp(‘正在計(jì)算識(shí)別模型...‘)
for?i=1:num
???fname?=?sprintf(‘%ss%d.wav‘?‘data\train\‘?i);?
???[s?fs]?=?wavread(fname);
????v?=mfcc(s?fs);?
????[nm]=size(v);
????a=reshape(v1n*m);
????b=a(1:15);
ref(i).p?=?b;
????
end?
p=ref(1).p;
for?i=1:num-1
????p=[p;ref(i+1).p];
end
T=[1?0?0?0?0?0?0?0?0?0?0?0?0?0?0;
???0?1?0?0?0?0?0?0?0?0?0?0?0?0?0;
???0?0?1?0?0?0?0?0?0?0?0?0?0?0?0;
???0?0?0?1?0?0?0?0?0?0?0?0?0?0?0;
???0?0?0?0?1?0?0?0?0?0?0?0?0?0?0;
???0?0?0?0?0?1?0?0?0?0?0?0?0?0?0;
???0?0?0?0?0?0?1?0?0?0?0?0?0?0?0;
???0?0?0?0?0?0?0?1?0?0?0?0?0?0?0;
???0?0?0?0?0?0?0?0?1?0?0?0?0?0?0;
???0?0?0?0?0?0?0?0?0?1?0?0?0?0?0;
???0?0?0?0?0?0?0?0?0?0?1?0?0?0?0;
???0?0?0?0?0?0?0?0?0?0?0?1?0?0?0;
???0?0?0?0?0?0?0?0?0?0?0?0?1?0?0;
???0?0?0?0?0?0?0?0?0?0?0?0?0?1?0;
???0?0?0?0?0?0?0?0?0?0?0?0?0?0?1
];

Pr=[min(p(1:))max(p(1:))];
for?k=2:num
Pr=[Pr;min(p(k:))max(p(k:))];
end
p=p‘;
T=T‘;

%net=newff(Pr[162515]{‘tansig‘‘logsig‘‘purelin‘}‘traingdm‘);
%net.trainParam.show?=?50;
%net.trainParam.lr?=?0.05;
%net.trainParam.epochs?=?10000;
%net.trainParam.goal?=?1e-5;
%net?=train(netpT);



%Y=sim(netp);

%yc=vec2ind(Y);
maxvalue=0;k=0;
disp(‘正在計(jì)算測(cè)試識(shí)別的結(jié)果...‘)
for?i=1:num
???fname?=?sprintf(‘%ss%d.wav‘?‘data\test\‘?i);?
???[s?fs]?=?wavread(fname);
????v?=mfcc(s?fs);?
????[nm]=size(v);
????a_test=reshape(v1n*m);
????b_test=a_test(1:15);
????test(i).p_test?=?b_test;
????
end?
p_test=test(1).p_test;
for?i=1:num-1
????p_test=[p_test;test(i+1).p_test];
end
p_test=p_test‘;
%Y_test=sim(netp_test);

[nbminbmaxbnaminamaxa]=premnmx(p_testp);

net=newff(Pr[2515]{‘tansig‘‘logsig‘}‘traingdm‘);
net=init(net);
net.trainParam.show?=?50;
net.trainParam.lr?=?0.2;
net.trainParam.epochs?=?10000;
net.trainParam.goal?=?1e-5;

?%[nm]=size(na);
??%na=reshape(na1n*m)
net=train(netnbna);
nc=?sim(netnb);
c=postmnmx(ncminamaxa);

[ntestmintestmaxtest]=premnmx(p_test);
nnetout=?sim(netntest);
netout=postmnmx(nnetoutmintestmaxtest);


real=p;


me=mean(real-netout)
st=std(netout-real)
save?e:\mybiye\mymatlabsuoshi\rengongshenjingnetwork\wzy.txt?c?-ASCII;

%net=newff(minmax(p)[1015]{‘tansig‘‘logsig‘}‘traingdm‘);
%net.trainParam.show?=?50;
%net.trainParam.lr?=?0.05;
%net.trainParam.epochs?=?100;
%net.trainParam.goal?=?0.1;
%net=train(netpT);
%y=?sim(netp);

%y_test=?sim(netp_test);


%maxvalue=0;k=0;
%for?m=1;num
????%for?n=1:num
????????%if?(Y_test(nm)>maxvalue)
???????????%?maxvalue=Y_test(nm);
???????????%?k=n;
???????????%end
???????????%end
????%msg?=?sprintf(‘測(cè)試說(shuō)話人?%d?和模板中的說(shuō)話人?%d?匹配‘?m?k);
????%disp(msg);
???%maxvalue=0;
???%?k=0;
???%end


?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----

?????文件??????55244??2004-10-27?17:51??data\test\s1.wav

?????文件??????52044??2004-11-05?11:30??data\test\s10.wav

?????文件??????56844??2004-11-01?17:34??data\test\s11.wav

?????文件??????56044??2004-10-27?11:19??data\test\s12.wav

?????文件??????48044??2004-11-05?10:56??data\test\s13.wav

?????文件??????55244??2004-10-27?17:42??data\test\s14.wav

?????文件??????52844??2004-10-27?10:10??data\test\s15.wav

?????文件??????52844??2004-10-27?18:14??data\test\s2.wav

?????文件??????56044??2004-11-05?11:26??data\test\s3.wav

?????文件??????59244??2004-10-27?18:09??data\test\s4.wav

?????文件??????56844??2004-10-27?10:21??data\test\s5.wav

?????文件??????51244??2004-10-27?10:06??data\test\s6.wav

?????文件??????48844??2004-10-27?11:28??data\test\s7.wav

?????文件??????52844??2004-11-05?11:33??data\test\s8.wav

?????文件??????48044??2004-10-27?18:06??data\test\s9.wav

????..AD...?????????0??2005-09-02?12:57??data\test

?????文件??????53644??2004-10-27?17:47??data\train\s1.wav

?????文件??????48844??2004-11-05?11:28??data\train\s10.wav

?????文件??????56844??2004-11-01?17:31??data\train\s11.wav

?????文件??????57644??2004-10-27?11:17??data\train\s12.wav

?????文件??????51244??2004-11-05?10:53??data\train\s13.wav

?????文件??????50444??2004-10-27?17:39??data\train\s14.wav

?????文件??????56044??2004-10-27?10:08??data\train\s15.wav

?????文件??????52044??2004-10-27?18:10??data\train\s2.wav

?????文件??????55244??2004-11-05?11:23??data\train\s3.wav

?????文件??????52044??2004-10-27?18:07??data\train\s4.wav

?????文件??????49644??2004-10-27?10:02??data\train\s5.wav

?????文件??????48044??2004-10-27?10:03??data\train\s6.wav

?????文件??????53644??2004-10-27?11:25??data\train\s7.wav

?????文件??????48044??2004-11-05?11:31??data\train\s8.wav

............此處省略22個(gè)文件信息

評(píng)論

共有 條評(píng)論

相關(guān)資源