96-03-18.m

Matlab數位影音處理 影像方面的處理

clear all;
f=imread('d:\image\caribou.tif');
figure;
subplot(3,3,1);
imshow(f)
subplot(3,3,2);
imhist(f)
subplot(3,3,3)
g1=histeq(f,256);
imshow(g1),%ylim('autu')
subplot(3,3,4);
imhist(g1)
subplot(3,3,5);
plot(f,g1)
t1=64/96*[0:96];
t2=2*[97:160]-128;
t3=0.6632*[161:255]+85.8947;
T=uint8(floor([t1,t2,t3]));
g3=T(f);
subplot(3,3,8);
imshow(g3)
subplot(3,3,9);
imhist(g3)
h2=twomodegauss(0.15,0.05,0.75,0.05,1,0.07,0.002);
g2=histeq(f,h2);
subplot(3,3,6);
imshow(g2)
subplot(3,3,7);
imhist(g2)