Untitled

pkg load image;

I=imread('pout.tif');

figure;
subplot(2,2,1);
imshow(I);
subplot(2,2,2);
imhist(I);
J=histeq(I);
subplot(2,2,3);
imshow(J);
subplot(2,2,4);
imhist(J);