首页资源分类应用技术测试测量 > 面积和周长计算程序

面积和周长计算程序

已有 445110个资源

下载专区

上传者其他资源

    文档信息举报收藏

    标    签:周长面积MATLAB

    分    享:

    文档简介

    此程序使用MATLAB快速变成 提取目标物的周长面积准确

    文档预览

    面积 I=imread('10.jpg'); I_bw=im2bw(I); %转化为二值图像 figure; subplot(121), imshow(I_bw); %显示原图像 [m,n]=find(I_bw==255);%找出二值图像中白色的点£ pos=[m';n'];% 把对应白色点的坐标放到POS,第一行对应第I个坐标的x,第二行对应第I个坐标的y Area=size(m,1);%计算出白色点的数 G=edge(I_bw,'canny',[.18 .38],3); subplot(122),imshow(G); [mm,nn]=find(G==1); Loop_Length=size(mm,1);%计算周长 RealArea=Area+ Loop_Length 周长 close all;clear all;clc; I=imread('10.jpg'); I=rgb2gray(I); I=imnoise(I,'salt & pepper',0.01); I=medfilt2(I); I=im2double(I); I=im2bw(I); C=bwlabel(I,4); L=regionprops(C,'Perimeter') 面积 close all; clear all; I=imread('12.jpg'); I=rgb2gray(I); figure;imshow(I); I=im2double(I); I=im2bw(I); I=~I;%%反色 bw=imfill(I,'holes'); bw=bwareaopen(bw,1000); %降噪处理 figure;imshow(bw); [C num]=bwlabel(bw,4); L=regionprops(C,'Area'); area = L(1).Area; metric_string = sprintf('%2.2f',area); title(['面积为:',metric_string],'Color','r'); 最小外接矩形 % By lyqmath % DLUT School of Mathematical Sciences % BLOG£ºhttp://blog.csdn.net/lyqmath clc; clear all; close all; I = imread('10.jpg'); figure; imshow(I); hold on; bw = im2bw(I, graythresh(I)); bw = imclose(bw, strel('disk', 5)); [L, num] = bwlabel(bw); stats = regionprops(L); for i = 1 : num temp = stats(i).BoundingBox; rectangle('Position', temp, 'EdgeColor', 'r', 'LineWidth', 2); end

    Top_arrow
    回到顶部
    EEWORLD下载中心所有资源均来自网友分享,如有侵权,请发送举报邮件到客服邮箱bbs_service@eeworld.com.cn 或通过站内短信息或QQ:273568022联系管理员 高进,我们会尽快处理。