function bin = binar_man (I)     %fonction qui prend en paramètre une image I et retourne une image binaire (seuil de binarisation rentré par l'utilisateur au clavier)
	[m, n, can] = size(I);      %m=nb lignes, n=nb colonnes, can=nb canaux
	if(can > 1)
	    I = rgb2gray(I);          %dans le cas d'une image couleur, la transformer en NG
	end
	
	seuil = input('Donner le seuil: ');   %Demander à l'utilisateur d'entrée une valeur de seuil
	bin =(I >= seuil) * 255;                %efficacité du calcul matriciel de Matlab (gain de temps de calcul par rapport aux boucles for)
	
	figure
	%divise la fenêtre en 1 ligne et 2 colonnes : pour afficher 2 images l'une à côté de l'autre
	subplot(1, 2, 1)     %sélectionne le premier cadran 
	colormap(gray)
	imagesc(I);           %affichage de l'image originale
	subplot(1, 2, 2)     %sélectionne le deuxième cadran
	colormap(gray)
	imagesc(bin);  
	title(strcat(['Seuil égal à ', num2str(seuil)]));    % affichage du seuil