JPEG.rar_The Image

%------------------------------- JPEG --------------------------% function B= JPEG(A,F) % A : original image % F : compression factor w = size (A, 2); S =floor(w / F); B = []; for k=1:3% all color layers: RGB for i=1:size(A, 1)% all rows rowDCT = dct(double(A(i,:,k))); B(i,:,k) = idct(rowDCT(1:samplesQuarter), w); end end B=uint8(B); return