Şekil 1.1’de bulunan üçgen ve beşgen görselinin köşegen sayılarını hesaplayarak köşeleri işaretleyelim ve şekilleri iki ayrı ekranda gösterelim.

im=imread(‘ucgenbesgen.jpg’); %UÇGEN resim aldık
im2=rgb2gray(im);%resmi siyah beyaz yaptık
im3=im2<=100;
im4=bwareaopen(im3,50); %% resimdeki adacıkları yok eder.
% [x y]=imcrop(im4); %% Resimde crop yaparak resmi kestik.
% [x1 y1]=imcrop(im4);
resim1=imcrop(im4,[2.5100 90.510 449.9800 367.9800]);
imshow(resim1);
out=corner(resim1,’QualityLevel’,0.5);%% OUT matrisinde Köşe noktalarını belirledi
hold on;
plot(out(:,1), out(:,2),’r*’); %% Her bir noktanın koordinatlarına * yaparak plot komutuysa
%% yazdıracağız. 3 adet kose noktası bulana kadar qualıty
%%değerıyle oynayacağız. Plot ile x ve y
%%noktlarındaki üçgenin koşe noktalarını
%%bulduk. Oraya yıldız işareti koyduk.
title([‘Şekil Köşegen Sayısı=’,num2str(length(out))]);
resim2=imcrop(im4,[458.5100 91.5100 378.9800 335.9800]);
figure;imshow(resim2)
out1=corner(resim2,’QualityLevel’,0.5); %%corner köşe noktalarını belirlemek için kullanılır
hold on;
plot(out1(:,1), out1(:,2),’r*’);
title([‘Şekil Köşegen Sayısı=’,num2str(length(out1))]);

