Discussion :

[grenchar]

Bonjour,

J'ai créé un code qui se présente ainsi :
1. Ouverture de toutes les images (tous formats) se trouvant dans un dossier 'Images'
2. Conversion en TIFF
3. Détection des visages présents sur ces images
4. Enregistrement des visages dans un dossier 'Visages'
5. Evaluation de la qualité du visage pour juger de son utilité

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
% Ouverture et conversion en TIFF
...
 
% Ouverture des images TIFF
file      = 'C:\...\Images';    % dossier à explorer
extension = '*.tif';            % extension prise en compte
 
chemin = fullfile(file,extension);
list = dir(chemin);
 
for n = 1:numel(list)
 
    info  = imfinfo(fullfile(file,list(n).name),extension(3:end));
    Nom   = info.Filename;    
    img   = imread(fullfile(file,list(n).name),extension(3:end));
 
% détection des visages
...
 
% découpage des visages détectés
hold on
for i=1:size(pos,1)
  img2 = imcrop(img,[pos(i,1)-pos(i,3)/1.3,pos(i,2)-pos(i,3)*1.2,...
      pos(i,3)*1.5,pos(i,3)*2]);            % coordonnées des 4 coins du carré
  img3 = [Nom(1:end-4) '_' num2str(i) '.tif'];
  imwrite(img2,img3);                           
hold off
end
end

La dernière partie n'est pas encore parfaitement au point, le but sera d'enregistrer le visage en dans un dossier en fonction de sa qualité. Pour l'instant, tout ce que je recherche, c'est de sauver tous les visages détectés dans le dossier 'Visages' et non dans le dossier de départ 'Images'.

Je pense que c'est une commande toute simple qui m'échappe, je n'arrive pas à mettre le chemin d'accès du dossier 'Images' en argument avec la fonction imwrite. J'ai cherché dans l'aide pour fullfile, path ou addpath, mais rien n'y fait...

Merci pour votre aide!

[Caro-Line]

Tu n'étais pourtant pas loin.
Au lieu de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

img3 = [Nom(1:end-4) '_' num2str(i) '.tif'];

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
dossier='C:\Visages';%par ex
%...Les boucles
img3=fullfile(dossier,[Nom(1:end-4) '_' num2str(i) '.tif']);

[Jerome Briot]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

img3 = fullfile(dossier,[Nom(1:end-4) '_' num2str(i) '.tif']);

Ou :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

img3 = fullfile(dossier,sprintf('%s_%d.tif',Nom(1:end-4),i));

[grenchar]

Je le savais! Depuis le temps que je tournais autour...

MERCI!!!