I=imread('matlab2.png');

BW=im2bw(I);

BW=BW(20:270,20:218);

figure,imshow(BW),hold on

se=[0 1 0;1 1 1;0 1 0];

BW=imdilate(BW,se);

figure,imshow(BW),hold on

L=bwlabel(BW);

stats=regionprops(L,'BoundingBox');

temp=stats.BoundingBox;

rectangle('position',temp,'edgecolor','r');

BW=BW(floor(temp(2))-1:floor(temp(2)+temp(4))+1,floor(temp(1))-1:floor(temp(1)...

+temp(3))+1);

BW=edge(BW,'canny');

figure,imshow(BW),hold on

[y,x]=find(BW==1);

[m,index]=max(y);

y_max=m;

x_max=x(index);

text(x_max, y_max,'A','color','red')

distance_max=0;

for k=1:size(x)

distance=norm(([x(k),y(k)]-[x_max,y_max]),2);