1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
| im=imread('C:\Documents and Settings\Imagerie\Bureau\Photo 001.jpg');
imshow(im);
level=graythresh(im);
imbw=im2bw(im,level);
imbw=imcomplement(imbw);
figure;imshow(imbw);
%permet de dilater les traits
%(Tu peux essayer de changer disk par autre chose et aussi utiliser la
%fonction imerode('line', ) voir doc pour enlever les lignes peut être
se = strel('disk',5);
imdil=imdilate(imbw,se);
figure;imshow(imdil);
%repère les régions (tu peux changer les paramètres à étudier je les ai mis au pif
L = bwlabel(imdil);
stats = regionprops(L,'Area','Centroid','MajorAxisLength','MinorAxisLength','Orientation','Perimeter','Image','BoundingBox'); |
Partager