• 大小: 1KB
    文件类型: .rar
    金币: 1
    下载: 0 次
    发布日期: 2021-02-12
  • 语言: Matlab
  • 标签: 基于  膨胀腐蚀  

资源简介

本程序是基于Matlab的米粒图像的分割、计数以及周长、面积、形状因子等参数的计算。图像分割是基于腐蚀膨胀算法,选用边界跟踪法计算周长,程序代码清晰明了,对于参数的计算速度较快,且参数计算精度较高。

资源截图

代码片段和文件信息

clc
clear
A=imread(‘F:\大三下\计算机在材料\关于作业\IMAGE\bacteria.bmp‘);
%imhist(A);
A=medfilt2(A);
%  imshow(A);
%  figure;

[mn]=size(A);
%二值化部分
for i=1:m
    for j=1:n
        if A(ij)>79
            A(ij)=0;
        else A(ij)=255;
        end
    end
end
A=medfilt2(A);
A(21)=0;A(12)=0;A(22)=0;
A(2178)=0;A(1177)=0;A(2177)=0;
A(1782)=0;A(1771)=0;A(1772)=0;
A(177177)=0;A(178177)=0;A(177178)=0;

%显示二值化后图像
imshow(A);

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%颗粒标记部分%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
N=zeros(mn);
num=0;%记录颗粒数目

%扫描目标区域
for i=2:m
    for j=2:n
        if A(ij)==255 && A(i-1j)==0 && A(ij-1)==0 && N(i-1j)==0 && N(ij-1)==0
            num=num+1;
            N(ij)=num;
%         elseif A(ij)==255 && A(i-1j)==255 && A(ij-1)==0
          

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       4607  2010-06-07 12:16  image_processing.m

----------- ---------  ---------- -----  ----

                 4607                    1


评论

共有 条评论

相关资源