?? 0~9bp測試.m
字號:
%test 開始測試
count=0
load('-ascii', 'usps_test.txt');%載入測試集文件
for isamp=1:2000
for i=2:inNum+1
x(1,i-1)=usps_test(isamp,i);
end
yd1=usps_test(isamp,1);
if yd1==0
yd=[0 0 0 0];
elseif yd1==1
yd=[0 0 0 1];
elseif yd1==2
yd=[0 0 1 0];
elseif yd1==3
yd=[0 0 1 1];
elseif yd1==4
yd=[0 1 0 0];
elseif yd1==5
yd=[0 1 0 1];
elseif yd1==6
yd=[0 1 1 0];
elseif yd1==7
yd=[0 1 1 1];
elseif yd1==8
yd=[1 0 0 0];
elseif yd1==9
yd=[1 0 0 1];
end
%構(gòu)造每個(gè)樣品的輸入和輸出標(biāo)準(zhǔn)
for j=1:hideNum
o1(1,j)=0.0;
for i=1:inNum
o1(1,j)=o1(1,j)+w(i,j)*x(1,i);%隱含層各單元輸入激活值
end
x1(1,j)=1.0/(1+exp(-o1(1,j)));%隱含層各單元的輸出
end
for k=1:outNum
o2(1,k)=0.0;
for j=1:hideNum
o2(1,k)=o2(1,k)+w1(j,k)*x1(1,j);
end
x2(1,k)=1.0/(1.0+exp(-o2(1,k)));%輸出層各單元輸出
end
flag=0
for compare=1:4
com=abs(yd(1,compare)-x2(1,compare))
if com>0.5
flag=1
end
end
if flag==0 %匹配正確時(shí)count+1
count=count+1
end
end
result=count/2000
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -