partie 1 :Compression :
Transformation des couleurs : RVB > YCbCr
function [y,cb,cr]=toycbcr(r,v,b)
%Transformation RVB en YCBCR
nl=0;
while nl<8
nc=0;
while nc<8
A=[0.299 0.587 0.114;0.5 -0.41869 -0.08131; -0.16875 -0.33126 0.5];
D=double(A)*double([r(1+nl,1+nc);v(1+nl,1+nc);b(1+nl,1+nc)]);
y(nl+1,nc+1)=D(1,1); cb(nl+1,nc+1)=D(2,1); cr(nl+1,nc+1)=D(3,1);
nc=nc+1;
end % end while
nl=nl+1;
end % while
y=round(y);cb=round(cb);cr=round(cr);
cb=cb+128;cr=cr+128;