corr_alphabet.m

来自「人工神经网络资料」· M 代码 · 共 19 行

[alphabet,targets] =prprob1;
re=[];
for i=1:36;
noisy = alphabet(:,i)+randn(35,1) * 0.4;
for j=1:36;
Alp=alphabet(:,j);
c=corrcoef(Alp,noisy);
re(i,j)=c(1,2);
end
[r,c]=max(re(i,:));
figure(1)
plotchar(noisy);
figure(2)
plotchar(alphabet(:,c));
pause
end