人脸识别、人脸检测、人脸计数、滤波去噪-课后作业.docVIP

上海大学 2013～14 学年 秋 季学期研究生课程作业 课程名称： 视觉检测技术 课程编号： 09SAS9026 研究生姓名: 许海 学 号: 论文评语: 成 绩: 任课教师: 张曦，张旭 评阅日期: 主要内容(目录)： （1）分割头发………………………………………..2 （2）人脸检测定位…………………………………..5 （3）人脸检测计数…………………………………..9 （4）图像滤波……………………………………….13 第一题： 分割头发 尝试两种方法获得：（1）闭运算法；（2）多次膨胀法 原图： 图1. Sun 闭运算法 程序： clear all close all clc %闭运算的方法 将图片放入指定位置运行此程序 i=imread(F:\ Sun.jpg); I=rgb2gray(i); figure,imshow(I),title(灰度图); figure,imhist(I),title(直方图); %计算和显示直方图 for k=1:500 for j=1:375 if ( I(k,j)=60 ) I(k,j)=255; else if (I(k,j)=30) I(k,j)=0; end end end end figure,imshow(I),title(修改后的灰度图); threshold=graythresh(I); BW1=im2bw(I,threshold); %将i转化成黑白两色 figure,imshow(BW1),title(二进制图); imwrite(BW1,F:\孙燕姿.png); originalBW=imread(F:\孙燕姿.png); figure,imshow(originalBW),title(yuanshitu); se = strel(disk,7); closeBW = imclose(originalBW,se); figure,imshow(closeBW),title(闭运算之后的图形); 效果图： 图2. 闭运算分割头发 （2）多次膨胀法 程序：%多次膨胀分割头发的方法 i=imread(F:\ Sun.jpg); I=rgb2gray(i); figure,imshow(I),title(灰度图); figure,imhist(I),title(直方图); %计算和显示直方图 for k=1:500 for j=1:375 if ( I(k,j)=60 ) I(k,j)=255; else if (I(k,j)=30) I(k,j)=0; end end end end figure,imshow(I),title(修改后的灰度图); threshold=graythresh(I); BW1=im2bw(I,threshold); %将i转化成黑白两色 figure,imshow(BW1),title(二进制图); imwrite(BW1,F:\孙燕姿.png); bw=imread(F:\孙燕姿.png); se = strel(line,11,90); bw2 = imdilate(bw,se); figure,imshow(bw2),title(膨胀运算后的图形); se1 = strel(line,7,100); bw3 = imdilate(bw2,se1); figure,imshow(bw3),title(再次膨胀运算后的图形2); 效果图： 图3. 多次膨胀分割头发 综合比较： 在分割头发的时候，多次膨胀的方法个好一些。 说明：以下程序（程序3、4）的运行结果均为作者据该图片调试所得，无可移植性而言，非常抱歉。 第二题： 人脸识别与检测 原图如图1 程序： clear all close all clc %人脸检测定位； %本程序可移植性不好；很不好 %本程序只针对500x375的图片，对于其他大小的图片要加以修改 %本程序中的阈值等要根据实际情况加以设定 %建议将附带图片放在指定位置 运行本程序 H(10,500)