www.gusucode.com > IPCV_Eval_Kit_R2019a_0ce6858工具箱matlab程序源码 > IPCV_Eval_Kit_R2019a_0ce6858/code/demo_files/I2_09_0_myWashers7s_long.m
clc;close all;imtool close all;clear; %% 夋憸偺撉崬傒丒昞帵 I = imread('I2_09_0_washers7s.JPG'); imtool(I); %% 墌偺専弌乮c:拞怱揰丄r:敿宎乯丄昤夋丒昞帵 [c, r] = imfindcircles(I, [30 45], 'Sensitivity', 0.9); %僨僼僅儖僩偱偼丄攚宨傛傝傕柧傞偄傕偺傪扵偡丅敿宎25~55僺僋僙儖 I1 = insertShape(I, 'Circle', [c, r], 'Color','red', 'LineWidth',3); I2 = insertText(I1, [20, 400], ['Count: ' num2str(size(c,1))], 'TextColor','white', 'FontSize',24); figure;imshow(I2); %% 敿宎偺僸僗僩僌儔儉昞帵 figure;hist(r, [1:44]); %% 戝彫偺戝偒偝傪幆暿偟丄寢壥偺昞帵 ind_l = r > 37 I3 = insertShape(I, 'Circle', [c(ind_l,:), r(ind_l)], 'Color','blue', 'LineWidth',3); I4 = insertShape(I3, 'Circle', [c(~ind_l,:), r(~ind_l)], 'Color','green', 'LineWidth',3); I5 = insertText(I4, [20, 1], ['Count: Large=' num2str(nnz(ind_l)) ', Small=' num2str(nnz(~ind_l))], 'TextColor','white', 'FontSize',24); figure;imshow(I5); %% 廔椆 % Copyright 2014 The MathWorks, Inc. % 撪晹偱丄rgb2gray偱僌儗乕僗働乕儖偵曄姺