[Mathlab] Compteur de monnaie et ultimate erosion

[Batfly]

Bonjour!

je suis en ce moment en train de voir comment fonctionne une algo sur le comptage de pièce de monnaie à partir d'une image.

On est donc confronté à 3 problèmes:
- Les pièces isolé
- Les pièces qui se touchent
- Les pièces sur le rebord de l'image


En ce qui concerne les piéces qui se touchent, on détermine le rayons de chacuns en les érodant au maximum, puis en faisant une déduction de leur rayons.

Problème: la fonction "ultimate erosion" ne permet pas de déterminer le nombre d'érosion que Mathlab a fait pour chaque images, et donc on ne peut déduire le reayons.

Y-a t-il une solution face à ce problème? Ou somme-nous dans un mauvais chemin (trouver autre chose que ulterosion).

Merci!
-----

[Batfly]

Bon, j'ai bien avancé sur l'objectif de faire un compteur de monnaie:


J'ai réussi à faire distinguer le fond des objets.

I=imread('euros.bmp');
imshow(I);

% We blow the picture:
IS = fspecial('disk',180);
Imflou = imfilter(I,IS,'replicate');
figure,imshow(Imflou);

% Then, we make the binary image:
BW=im2bw(I,graythresh(Imflou)) ;
figure, imshow(BW);

% And we use the filter "hole":
BWh=imfill(BW,'holes');
figure, imshow(BWh);

% We close for adjustement:
BW2 = bwmorph(BWh,'close');
figure,imshow(BW2);

Cependant, je dois encore déterminé la taille des pièces.

On m'a égalment parlé du Hough function, mais cela ne permet pas de séparer ces piéces.

Après l'érosion, le bondingbox permet après de simplifier sur la dertermination du rayon.

Je galère donc sur l'étape du milieux:
QUel fonction utilié? ultimate esosion est-il vraiment adéquate?
Hough function peut-il palier ce problème?

%se = strel('disk',1);
%BWe = imerode(BWh,se);
%figure,imshow(BWe);

ultimateErosion1 = bwulterode(BWh);
figure, imshow(ultimateErosion1)

% About the border coins:


%Bounding box
%Utilisation de bounding box pour convertir les cercle en rectangle, et
%faciliter les mesures:

L = bwlabel(BW2);
s = regionprops(L,'EquivDiameter', 'BoundingBox');
diametre=[s.EquivDiameter];
objet_bord=[s.BoundingBox];
[sza szb]=size(s);

% coins in the border:
%%objet_bord=s.BoundingBox;

Je commence vraiment à saturer ici, si je pouvais avoir au moins un indice...