shape detection and classification without regionprop command

Question

jason 2014-11-11

0
链接

此问题的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/162200-shape-detection-and-classification-without-regionprop-command

评论： Image Analyst 2017-3-19

1. A binary (black and white) image with all the shapes in white and background in black. In addition, a number, indicating the classification according to the above numbered descriptors, must be inserted in the center of each shape. A value of zero (0) should be placed in the center of the shape that does not fall into one of the above classifications.

A color image with each shape displayed in a pre-assigned color i.e. instead of inserting a number into each shape they can be displayed in different colors e.g. blue for all circles and yellow for all hexagons. The color black must be assigned to all unclassified shapes. The background of this image must be white.

A binary (black and white) image with all the shapes in white and background in black. In addition, a number, indicating the area (in m2 and 3 decimal places), must be inserted in the center of each shape in the image. A text value of "N/A" should be placed in the center of the shape that does not fall into one of the above classifications. Assume each pixel represents a distance of 1 mm.

In my attached files you would find my progress on each part of the question. I have done most of it, i just need your help to see where i am wrong.

9 个评论
显示 7更早的评论隐藏 7更早的评论

jason 2014-11-12

Got it working thanks guys:)

Image Analyst 2017-3-19

Attach YOUR code. I'm attaching my shape detection demos.

请先登录，再进行评论。

请先登录，再回答此问题。

Answer 1

Guillaume 2014-11-11

0
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/162200-shape-detection-and-classification-without-regionprop-command#answer_158538

在 MATLAB Online 中打开

Using text on a figure, only displays that text on the figure. It doesn't write it on the original image that you've used to create the figure.

Therefore, if you want all the numbers to be displayed on the final figure. You need to store their position and value until you're ready to write them at the end.

So at the beginning of your script, once you know how many shapes, predeclare a matrix for your centroids and a cell array for your text:

allcentroids = zeros(2, Ne);
texts = cell(1, Ne);

After you display your individual figures, you then store the centroid and text in the corresponding column of the above matrix/cell

allcentroids(:, n) = Centroid';
texts{n} = num2str(a);

Then after you display the final image, you also display the text at the coordinate you saved

figure(99),imshow(img_wk_bw_L_total);  
for shapenumber = 1:Ne
   text(allcentroids(1, shapenumber), allcentroids(2, shapenumber), texts{shapenumber});
end

11 个评论
显示 9更早的评论隐藏 9更早的评论

jason 2014-11-11

在 MATLAB Online 中打开

close all %close previous work clc %clears command window image=('test_shapes.jpg'); %load test image RGB = imread(image); %read the loaded image

sharp=imsharpen(RGB); %sharpen the read image grayscale=rgb2gray(sharp); %convert from rgb image to grayscale format

h = fspecial('gaussian',40,1); %create a smoothing filter filtered=imfilter(grayscale,h); %filtering

Edgecanny = edge(filtered,'canny'); %edge detection X=imfill(Edgecanny,'holes'); %fill in with holes

Bw=im2bw(X); %convert to black and white image figure(3), imshow(Bw); %displays black and white image

dimensions = size(RGB); %finds size of original image img_blank = zeros(dimensions); %creates a blank image same size as original

[L,Ne]=bwlabel(Bw); img_wk_bw_L=L==100; figure(5),imshow(img_wk_bw_L); img_wk_bw_L_total=img_wk_bw_L*0;

 for n=1:Ne
allcentroids = zeros(2, Ne);
texts = cell(1, Ne);   
                                                %SHAPE FACTORS%

img_wk_bw_L=(L==n);

[row, col] = find(L==n); Edgesobel=edge((L==n), 'sobel'); %edge detect each shape again BinaryX1=imfill((L==n),'holes'); %fill in the holes in each binarycomponent

%To find Bounding Box sx=min(col)-0.5; %starting position for column sy=min(row)-0.5; %starting position for row breadth=max(col)-min(col)+1; %gives breadth of the box length=max(row)-min(row)+1; %gives length of the box BBox=[sx sy breadth length]; %Bounding Box value for the range of n

%To find Ratio area1=bwarea(BinaryX1); %calculates the area of each binary component x1=round(area1); %rounding off calculated area d=x1 * %converting from mm to m a=roundn(d,-3); %rounding off to 3 decimal places area2=(length*breadth %calculates the area of each bounding box ratio = area2/area1; %calculates the ratio of area's Ratio=roundn(ratio,-2); %rounds the ratio to two decimal places

%Find Perimeter BW1=bwboundaries(BinaryX1); c=cell2mat(BW1(1)); Perimeter=0; for i=1:size(c,1)-1 Perimeter=Perimeter+sqrt((c(i,1)-c(i+1,1)).^2+(c(i,2)-c(i+1,2)).^2); end display(Perimeter);

%Find Roundness Roundness=(4*area1*pi)\Perimeter.^2; display(Roundness); %display roundness factor

%Edge Detection Mx=corner(Edgesobel); %corner detection x1 = Mx(2,1); x2 = Mx(3,1); x3 = Mx(1,1); y1 = Mx(2,2); y2 = Mx(3,2); y3 = Mx(1,2);

length = sqrt(((x3-x2).^2)+((y1-y2).^2)); %length of side D1 height= sqrt(((x3-x2).^2)+((y3-y2).^2)); %length of side D2 Result=length-height;

%Find Centroid X=mean(col); %calculates average of columns Y=mean(row); %calculates average of rows Centroid=[X Y]; %matrix of centroid dimensions display(Centroid); %display centroid

    %SHAPE CLASSIFICATION CIRCLE
    if(Ratio>=1.27 && Ratio<=1.29 && Roundness>=1.138 && Roundness<=1.200);  %compares factors
    disp('circle');                                                          %display result
    figure(10+n),imshow(L==n);title('Circle Image');                         %shows result in figure
    hold on                                                                  %holds figure
    text(Centroid(1),Centroid(2), num2str('1'));                               %places text
    hold off                                                                 %goes to next command
    img_wk_bw_L=(L==n);
    end
    %SHAPE CLASSIFICATION SQUARE
    if (Result==0 && Ratio==1 )                                              %compares factors
    disp('square');                                                          %display result
    figure(10+n), imshow(L==n);title('Square Image');                        %shows result in figure
    hold on                                                                  %holds figure
    text(Centroid(1),Centroid(2), num2str('2'));                               %places text
    hold off                                                                 %goes to next command                                                         
    img_wk_bw_L=(L==n);
    end
    %SHAPE CLASSIFICATION TRIANGLE
    if (Ratio>=1.82 && Ratio<=1.90 &&  Roundness>=1.800 && Roundness<=1.8500);%compares factors 
    disp('triangle');                                                         %display result 
    figure(10+n),imshow(L==n);title('Triangle Image');                        %shows result in figure 
    hold on                                                                   %holds figure 
    text(Centroid(1),Centroid(2), num2str('3'));                                %places text  
    hold off                                                                  %goes to next command  
    img_wk_bw_L=(L==n);
    end
    %SHAPE CLASSIFICATION RECTANGLE
    if (Result~=0 && Ratio==1)                                                %compares factors 
    disp('rectangle');                                                        %display result 
    figure(10+n), imshow(L==n);title('Rectangle Image');                      %shows result in figure 
    text(Centroid(1),Centroid(2), num2str('4'));                                %places text  
    img_wk_bw_L=(L==n);
    end 
    %SHAPE CLASSIFICATION PENTAGON
    if (Ratio>=1.40 && Ratio<=1.44 )                                          %compares factors  
    disp('pentagon');                                                         %display result 
    figure(10+n), imshow(L==n);title('Pentagon Image');                       %shows result in figure 
    text(Centroid(1),Centroid(2), num2str('5'));                                %places text
    img_wk_bw_L=(L==n);
    end
    %SHAPE CLASSIFICATION HEXAGON
    if (Ratio>=1.30 && Ratio<=1.32)                                           %compares factors
    disp('hexagon');                                                          %display result 
    figure(10+n),imshow(L==n);title('Hexagon Image');                         %shows result in figure
    text(Centroid(1),Centroid(2), num2str('6'));                                %places text
    img_wk_bw_L=(L==n);
    end
    %SHAPE CLASSIFICATION ELLIPSE
    if (Ratio>=1.25 && Ratio<=1.28 && Roundness>=1.400 && Roundness<=1.500)  %compares factors
    disp('ellipse');                                                         %display result 
    figure(10+n),imshow(L==n);title('Ellipse Image');                        %shows result in figure
    text(Centroid(1),Centroid(2), num2str('7'));                               %places text
    img_wk_bw_L=(L==n);
    end
    %SHAPE CLASSIFICATION OCTAGON
    if (Ratio>=1.10 && Ratio<=1.20)                                          %compares factors
    disp('octagon');                                                         %display result 
    figure(10+n),imshow(L==n);title('Octagon Image');                        %shows result in figure  
    text(Centroid(1),Centroid(2), num2str('8'));                               %places text   
    img_wk_bw_L=(L==n);
    end
    %SHAPE CLASSIFICATION DIAMOND
    if (Ratio>=1.87 && Ratio<=1.90 &&  Roundness>=1.300 && Roundness<=1.400 )%compares factors   
    disp('diamond');                                                         %display result
    shape='diamond';
    figure(10+n), imshow(L==n);title('Diamond Image');                       %shows result in figure  
    text(Centroid(1),Centroid(2), num2str('9'));                               %places text 
    img_wk_bw_L=(L==n);
    end
    %SHAPE CLASSIFICATION UNKNOWN SHAPES
    if (Ratio>=1.27 && Ratio<=1.29 && Roundness>=1.138 && Roundness<=1.200);       %compares factors 
    elseif(Result==0 && Ratio==1);                                                 %compares factors
    elseif(Ratio>=1.82 && Ratio<=1.90 &&  Roundness>=1.800 && Roundness<=1.8500);  %compares factors
    elseif(Ratio>=1.40 && Ratio<=1.44);                                            %compares factors
    elseif(Ratio>=1.30 && Ratio<=1.32);                                            %compares factors
    elseif(Ratio>=1.25 && Ratio<=1.28 && Roundness>=1.400 && Roundness<=1.500);    %compares factors
    elseif(Ratio>=1.10 && Ratio<=1.20);                                            %compares factors
    elseif(Ratio>=1.87 && Ratio<=1.90 &&  Roundness>=1.300 && Roundness<=1.400 );  %compares factors
    elseif(Result~=0 && Ratio==1);                                                 %compares factors
    else figure(10+n), imshow(L==n);title('Not classified');                       %shows result in figure  
         text(Centroid(1),Centroid(2), num2str('0'));                               %places text 
         img_wk_bw_L=(L==n);                                                                
    end
allcentroids(:, n) = Centroid';
texts{n} = num2str(a);
img_wk_bw_L_total= (img_wk_bw_L_total + img_wk_bw_L) > 0;
figure(99),imshow(img_wk_bw_L_total);  
for shapenumber = 1:Ne
   text(allcentroids(1, shapenumber), allcentroids(2, shapenumber), texts{shapenumber});
end
 end

jason 2014-11-12

Got it working thanks guys:)

jason 2014-11-12

colorfinal.m

Now that each shape is classified into its group, how would i go about to add color to each shape, each shape must be colored according to group i.e squares all blue, circles all red,but shape that don't fall into the classification should be black in color. I used RGB2 below but i cant add the shapes together into an image with a white background. Is there any other method???

RGB2 = label2rgb(L==n, 'copper', 'w', 'noshuffle');

请先登录，再进行评论。

Answer 2

jason 2014-11-11

0
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/162200-shape-detection-and-classification-without-regionprop-command#answer_158482

0 个评论
显示 -2更早的评论隐藏 -2更早的评论

请先登录，再进行评论。

Answer 3

jason 2014-11-12

0
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/162200-shape-detection-and-classification-without-regionprop-command#answer_158631

colorfinal.m

Now that each shape is classified into its group, how would i go about to add color to each shape, each shape must be colored according to group i.e squares all blue, circles all red,but shape that don't fall into the classification should be black in color. I used RGB2 below but i cant add the shapes together into an image with a white background. Is there any other method???

RGB2 = label2rgb(L==n, 'copper', 'w', 'noshuffle');

0 个评论
显示 -2更早的评论隐藏 -2更早的评论

请先登录，再进行评论。

shape detection and classification without regionprop command

9 个评论
显示 7更早的评论隐藏 7更早的评论

采纳的回答

11 个评论
显示 9更早的评论隐藏 9更早的评论

更多回答（2 个）

0 个评论
显示 -2更早的评论隐藏 -2更早的评论

0 个评论
显示 -2更早的评论隐藏 -2更早的评论

另请参阅

类别

标签

Community Treasure Hunt

shape detection and classification without regionprop command

9 个评论 显示 7更早的评论隐藏 7更早的评论

采纳的回答

11 个评论 显示 9更早的评论隐藏 9更早的评论

更多回答（2 个）

0 个评论 显示 -2更早的评论隐藏 -2更早的评论

0 个评论 显示 -2更早的评论隐藏 -2更早的评论

另请参阅

类别

标签

Community Treasure Hunt

9 个评论
显示 7更早的评论隐藏 7更早的评论

11 个评论
显示 9更早的评论隐藏 9更早的评论

0 个评论
显示 -2更早的评论隐藏 -2更早的评论

0 个评论
显示 -2更早的评论隐藏 -2更早的评论