Histogramy pt.2

clear all;
close all;

load histogramZadany;
obrazek=imread("phobos.bmp");

h1=histeq(obrazek);
h2=histeq(obrazek,histogramZadany);
adj=imadjust(obrazek);
CLAHE=adapthisteq(obrazek);


figure;
subplot(2,2,1);
imshow(obrazek);
title("oryginal");
subplot(2,2,2);
imhist(obrazek);
subplot(2,2,3);
imshow(h1);
title("histeq");
subplot(2,2,4);
imhist(h1);

figure;
subplot(2,2,1);
imshow(obrazek);
title("oryginal");
subplot(2,2,2);
imhist(obrazek);
subplot(2,2,3);
imshow(h2);
title("histogram Zadany");
subplot(2,2,4);
imhist(h2);

figure;
subplot(3,2,1);
imshow(obrazek);
title("oryginal");
subplot(3,2,2);
imhist(obrazek);
subplot(3,2,3);
imshow(adj);
title("imadjust");
subplot(3,2,4);
imhist(adj);
subplot(3,2,5);
imshow(CLAHE);
title("CLAHE");
subplot(3,2,6);
imhist(CLAHE);