project3.asv

模式识别一份很好的作业,包括线性分类器；最小风险贝叶斯分类器；监督学习法分层聚类分析；K－L变换提取有效特征,支持向量机

load feature_table;
W=feature_table;
Dist=pdist(W);
Tree=linkage(Dist,'ward');
class=cluster(Tree,3);
class_1=find(class==1);
class_2=find(class==2);
class_3=find(class==3);
n1=size(class_1);
n2=size(class_2);
n3=size(class_3);
for i=1:n1
    1000<=class_1[i]<1500
     a1=a1+1;
end
for i=1:n2
    500<=class_2[i]<1000
     a2=a2+1;
end
for i=1:n3
    0<=class_1[i]<500
     a3=a3+1;
end
 err_bg=(500-a1)/