jpeg_klt.m

klt经典程序

function jpeg_klt(I,z)
% I=imread('football.jpg');%读入原始图像，该图片在安装matlab的目录中找，原图为jpeg图象
z=fix(z);
t(1:z)=1;
t(z+1:64)=0;
mask=jpeg_Dzz8(t);
I2(:,:,1)=klt(I(:,:,1),mask);
I2(:,:,2)=klt(I(:,:,2),mask);
I2(:,:,3)=klt(I(:,:,3),mask);
figure;
set(gcf,'unit','normalized','position',[0.2,0.5,0.3,0.3]);%设置图形窗大小
set(gcf,'menubar','none');								%删除图形窗工具条
str='量化矩阵中1的个数为';
set(gcf,'name',[str sprintf('%1.4g\',z)],'numbertitle','off');		%书写图形窗名
imshow(I2);
title('KLT变换压缩后的图像')  
imwrite(I2,'ktl.jpg');%输出压缩后的图像，文件名为ktl.jpg