homework2_liuyifa.m

这是一个模式识别中的留一法算法的一个简单仿真分类实例

clear all;
%以身高作为特征用留一法进行分类,只对女生的数据使用
M = load('E:\研究生课程\模式识别课程\homework1_1007\FEMALE.TXT');
N = load('E:\研究生课程\模式识别课程\homework1_1007\MALE.TXT');
 %先验概率
 pw1=0.5;%女生
 pw2=0.5;%男生
 right=0;
 wrong=0;
for i=1:50
    row=M(i,:)  %保存第i行数据
    M(i,:)=[];  %删除第i行数据
    fu=mean(M);%计算均值
    mu=mean(N);
    f_height_mu=fu(1,1);%女生身高的均值估值
    m_height_mu=mu(1,1);%男生身高的均值估值
    fd=std(M);%计算标准差
    md=std(N);
    f_height_sigma=fd(1,1);%女生身高的方差估值
    m_height_sigma=md(1,1);%男生身高的方差估值
   %女生条件概率服从N(f_height_mu,f_height_sigma)
   %男生条件概率服从N(m_height_mu,m_height_sigma)
   

%下面用删除的样本进行测试
   test=row(1,1);
   fy=normpdf(test,f_height_mu,f_height_sigma);
   fy=fy*pw1;
   my=normpdf(test,m_height_mu,m_height_sigma);
   my=my*pw2;
 if(fy>my)
    result='f';
 else
    result='m';
 end
 
 if(strcmp(result,'f')==1)
     right=right+1;
 elseif(strcmp(result,'f')==0)
     wrong=wrong+1;
 end
 M = load('E:\研究生课程\模式识别课程\homework1_1007\FEMALE.TXT');
    
end

wrong=wrong/50
%试验结果由身高做为特征值，先验概率为0.5对0.5，对FEMALE.TXT中的数据进行留一法测试，错误率为16%
%试验结果由身高做为特征值，先验概率为0.5对0.5，对MALE.TXT中的数据进行留一法测试，错误率为16%