Generar el Histograma de una Imagen En Escala de Grises con GNU Octave

Hola Gente! En este nuevo post vamos a ver un pequeño algoritmo que nos permite obtener el histograma de una imagen en Escala de Grises utilizando GNU Octave.

En el caso de que tengamos una imagen en color, vamos a proceder primero a convertirla a escala de grises y obtener las dimensiones:

imagenColor = imread('/home/analuz/Imágenes/OctaveIcon.jpg');

imagenGris = rgb2gray(imagen);
[renglones, columnas, t] = size(imagenGris);

Después procedemos a crear el vector de ceros con el rango de grises (256), el cual nos servirá para introducirle los valores del histograma.

histograma = zeros(256);

Ahora podemos utilizar las siguientes lineas que corresponden al agoritmo que generará el histograma de la imagen en escala de grises: 

for i=1:renglones

for j=1:columnas

histograma(imagen_gris(i,j)+1)=histograma(imagen_gris(i,j)+1)+1;

end

end

Finalmente, las siguientes instrucciones se encargaran de plasmar lo obtenido con las anteriores lineas:

figure, subplot(1,3,1),imshow(imagenColor),title('Imagen original');

subplot(1,3,2),imshow(imagenGris),title('Imagen gris');

subplot(1,3,3),plot(histograma),title('Histograma');

Y por fin hecho esto, al ejecutar nos debe aparecer una ventana como la siguiente: