判别分析 （ distinguish analysis）(三)：Bayes 判别

浅夏110

Bayes 判别和 Bayes 估计的思想方法是一样的，即假定对研究的对象已经有一定的 认识，这种认识常用先验概率来描述，当我们取得一个样本后，就可以用样本来修正已 有的先验概率分布，得出后验概率分布，再通过后验概率分布进行各种统计推断。  

1．误判概率与误判损失
- B/ P8 C3 M3 X. x/ \0 K设有两个总体 X1和 X2 ，根据某一个判别规则，将实际上为 X1的个体判为 X2 或者将实际上为 X2 的个体判为 X1 的概率就是误判概率，一个好的判别规则应该使误判概率最小。除此之外还有一个误判损失问题或者说误判产生的花费（cost）问题，如把  X1的个体误判到 X2 的损失比 X2 的个体误判到 X1 严重得多，则人们在作前一种判断时就要特别谨慎。譬如在药品检验中把有毒的样品判为无毒后果比无毒样品判为有毒严重得多，因此一个好的判别规则还必须使误判损失最小。
2 w7 u: I5 K3 y3 B3 D

: m  v/ O3 P$ }7 `) l: ]8 Q
平均误判损失ECM
% v4 Q7 u" D2 x8 W3 O6 b( J
! j, x2 u3 N7 A/ u% ~$ i
& n2 y# Q% k0 m; r* _1 Y! l
: y& A8 B0 f+ s( p. G; ~* B, y! }
6 n5 R$ }( Y% ?3 K5 P

! _% Q( d- {! o   一个合理的判别规则应使 ECM 达到极小。

1 B* B8 Y9 Y4 H 2．两总体的 Bayes 判别
$ g% \/ C$ j! k' E! _8 x) X


1 p& f- `8 ?. k( _- ]& k  E- n
2 k. a* {; D* V: H9 V

0 a6 N! r8 M4 u; H) S# E



Anderson 线性判别函数





  A  z. ?- U8 A( k% i* i, w
例：建立 Anderson 线性判别函数

1 w, D; G5 z) T8 d

9 |" O1 W/ {$ O
# u! A% C9 Q# Z/ J) n" v
/ U  m6 g- a+ {* d# R; I4 v计算的 MATLAB 程序如下：

! I* U7 T% ?' E6 fclc,clear
a=[24.8 24.1 26.6 23.5 25.5 27.4
. s# M- l" g) w! ^; R1 H-2.0 -2.4 -3.0 -1.9 -2.1 -3.1]';
b=[22.1 21.6 22.0 22.8 22.7 21.5 22.1 21.4
-0.7 -1.4 -0.8 -1.6 -1.5 -1.0 -1.2 -1.3]';
n1=6;n2=8;
mu1=mean(a);mu2=mean(b);
6 b1 q: O' F3 I3 b1 Zmu1=mu1',mu2=mu2'
9 n: A9 H' H, F' V" @" v4 F& Ys1=(n1-1)*cov(a),s2=(n2-1)*cov(b)
sigma2=(s1+s2)/(n1+n2-2)
beta=log(8/6)
. r/ v/ |& R8 U5 \) v( c+ Hsyms x1 x2
x=[x1;x2];
wx=(x-0.5*(mu1+mu2)).'*inv(sigma2)*(mu1-mu2);
; i! g! Q" g" fdigits(6),wx=vpa(wx)
5 O$ g1 H0 M" W* R; j7 Oahat=subs(wx,{x1,x2},{a(:,1),a(:,2)})
bhat=subs(wx,{x1,x2},{b(:,1),b(:,2)})

下面我们编写Σ1 ≠ Σ2 情形下的 MATLAB 程序：

clc,clear
: h5 y7 z6 F! `- ]; |0 b7 a  i/ yp1=6/14;p2=8/14;
a=[24.8 24.1 26.6 23.5 25.5 27.4
-2.0 -2.4 -3.0 -1.9 -2.1 -3.1]';
" \4 q/ ^; o# E, y/ f& p: j  Pb=[22.1 21.6 22.0 22.8 22.7 21.5 22.1 21.4
-0.7 -1.4 -0.8 -1.6 -1.5 -1.0 -1.2 -1.3]';
/ p$ b& l) m4 ~0 t6 Un1=6;n2=8;
mu1=mean(a);mu2=mean(b);
+ C' J4 w4 w7 z" |2 T) G* X  Ymu1=mu1',mu2=mu2'
cov1=cov(a),cov2=cov(b)
0 f4 b8 q2 r# P* qk=log(p2/p1)+0.5*log(det(cov1)/det(cov2))+0.5*(mu1'*inv(cov1)*mu1-mu2'*inv(
, P8 ~0 M( @& u: [1 A& acov2)*mu2)
syms x1 x2
$ Q$ Q2 C+ V, D& ^3 wx=[x1;x2];
* U. v3 ]/ A0 q5 j, Mwx=-0.5*x.'*(inv(cov1)-inv(cov2))*x+(mu1'*inv(cov1)-mu2'*inv(cov2))*x;
6 k7 k0 f" b: m, q4 P" f. Q# Zdigits(6),wx=vpa(wx);
$ _! K  ^& L! R1 owx=simple(wx)
ahat=subs(wx,{x1,x2},{a(:,1),a(:,2)})
bhat=subs(wx,{x1,x2},{b(:,1),b(:,2)})
9 j$ @/ H) q/ [- hahat>=k,bhat<k

分类正确率为 100％。
) Z; i; s" ?! p, X$ u( J2 P# y
1 f0 R4 g3 W3 h. f————————————————
. f7 ^* T/ p& K" F0 Y/ P版权声明：本文为CSDN博主「wamg潇潇」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。
4 s1 _* J5 S5 X# E% w- z原文链接：https://blog.csdn.net/qq_29831163/article/details/89607165

+ B7 I$ l- P' x& t1 b" g5 `