基本小函数(4)

图像处理的有用资料

阵

if sum(Temp(:))==square % 判断方阵中元素总和为 9 或 25 时 Output(i+Radius,j+Radius)=1; %方阵中心元素在输出矩阵中相应位置上的值为 1 end end end

% 四，输出处理前后的图像

figure,subplot(221),imshow(Input),title('原图像'); subplot(222),imshow(Two),title('二值化后的图像'); subplot(223),imshow(Output),title('腐蚀后的图像');

%--------------------------------End Code--------------------------------

拉普拉斯算子边缘检测- -

Tag： 图像处理 边缘检测 function PicOut=Lap_edge(PicInput,thresh)

% 本程序能够将BMP格式的黑白灰度图像用拉普拉斯算子进行边缘检测 % 生物图像处理作业2

% 格式为 a=Lap_edge(PicInput,thresh) 或者嵌套为 Lap_edge(imread('rice.tif'),15) % thresh参数可自选，对于rice.tif这张图来说最合适的值大约为14到18 % 使用例子：PicInput=imread('rice.tif'); % a=Lap_edge(PicInput,15);

%－－－－－－－－－－－－－－－－ BEGIN CODE －－－－－－－－－－－－－－－－ % 作者; lorder

% 一，原图像预处理，读入黑白图片并确定长和宽

[m,n]=size(PicInput); %确定图片的长和宽 % 二，拉普拉斯变换预处理，定义镜框矩阵和输出矩阵

r=m+2; %把图片的长和宽各加2 c=n+2;

PicFrame=zeros(r,c); %定义二维数组"PicFrame"，长、宽比"Input"