基本小函数(3)

图像处理的有用资料

像 figure NO 6 title('均衡化后图像')

imwrite(PA,'PicEqual.bmp');

图像腐蚀操作- -

Tag： 图像处理 腐蚀 function erode0207all(Input,thresh,element) % 本程序能够对灰度图像先进行二值化，再进行腐蚀操作

% 格式介绍：Input为欲处理的灰度图像；thresh为自选的阈值参数进行二值化，可输入0到255之间任意整数

% element为进行腐蚀操作的结构单元，本程序可提供3×3、5×5、7×7等奇数方阵的结构单元，

% 原点都在中心位置，建议用三阶或五阶方阵 % 作者; lorder

%----------------------------Begin Code------------------------------ % 一，图像二值化处理

[m,n]=size(Input); % 确定原图像的长、宽 Two=zeros(m,n); % 定义二值化矩阵

Two(find(Input>=thresh))=1; % 对原图像进行二值化处理 % 二，腐蚀操作前的预处理

Temp=zeros(element); % 定义3×3或5×5的结构单元 Output=zeros(m,n); % 定义输出矩阵 s=m+1-element; % s、t为循环长度 t=n+1-element;

Length=element-1; % Length和Radius的含义在循环中介绍 Radius=Length/2;

square=element*element; % 两个结构单元中元素的总和，即 9 、25 、49 ………… % 三，进行腐蚀操作 for i=1:s for j=1:t

Temp=Two(i:i+Length,j:j+Length); % 从二值化图像中依次取出三阶或五阶方