|  | 
| 头发区域面积应该在一定范围内  衣服区域应该很大 所以区域面积在一定范围内看做是人头 否则就去除可以用regionprops内的area去判断  同时加上长短轴 这里贴一个简单例子5 a/ w1 ^0 V3 D; g6 b3 ] 
 ! D( }: ~, J/ k  t/ q
 ) d8 A" a. @# ~: e* r' nclc; clear all; close all;
 3 r9 z- D! c5 Z+ i) UI = imread('c:\\ce.jpg');
 % ~7 P9 u2 s$ l# Y) x4 [I1 = rgb2gray(I);
 9 [4 [8 o+ r# X1 A+ J# V' {# ~& hbw1 = im2bw(I1, graythresh(I1));* }9 T$ u8 O6 ]7 @1 [
 bw1 = ~bw1;
 $ a& b. M3 ?  X3 B" q7 o3 wbw2 = imopen(bw1, strel('disk', 10));
 , C8 P$ b2 W) ?9 A) \bw2 = bwareaopen(bw2, 500);
 ! h; l, r- H7 U0 tbw3 = bwareaopen(bw2, 1000);& L* {- \$ Y# N3 D
 bw4 = bw2.*(~bw3);
 0 `+ F' r+ K# g6 \[L, num] = bwlabel(bw4);: K) e7 F1 X; x8 }
 Lrgb = label2rgb(L, 'jet', 'w', 'shuffle');4 {) D* Q6 R* h/ D2 Z# Y
 figure;
 ! v2 X1 J9 r2 v3 R/ L3 c, _subplot(3, 2, 1); imshow(I)8 V/ Q# M- }# w' F5 z
 subplot(3, 2, 2); imshow(I1), }* T/ o" N/ w# F. |/ N+ n
 subplot(3, 2, 3); imshow(bw1)7 C: w( j( O5 _# ~; K+ S# A
 subplot(3, 2, 4); imshow(bw2)
 ! b. G1 g: n. g/ B1 T% {, Asubplot(3, 2, 5); imshow(bw4)
 0 t5 H( h' ]4 J2 t# r8 U7 Qsubplot(3, 2, 6); imshow(I)
 ' Q" p0 r# w1 I' yhold on;
 : D, ]& d, j7 n+ u6 Bhimage = imshow(Lrgb);6 j% ]2 |- O1 D7 h" H5 M3 T+ d
 set(himage, 'AlphaData', 0.5);
 / {* e9 `" E. d
 | 
 |