Coding dan Hasil Convert Citra

Coding Program Mengubah Citra Berwarna ke Abu-Abu:

img=imread('c:\image\dani.jpg');
x=uint8(0.2989 * double(img(:,:,1))...
 + 0.5870 *double(img(:,:,2)) + 0.1141 *double(img(:,:,3)));
x=imread('c:\image\dani.jpg');
abu=rgb2ntsc(x);
imshow(abu)
y=abu(:,:,1);
subplot(1,2,2);imshow(y)
subplot(1,2,1);imshow(img)

Hasilnya:

---------------------------------------------------------------------------------------

Coding Program Mengubah Citra Abu-Abu ke Biner :

img=imread('c:\image\danii.png');
[tinggi,lebar] = size(img);
ambang=150;
biner=zeros(tinggi, lebar);
for baris=1 : tinggi
for kolom=1 : lebar
if  img(baris,kolom)  >=ambang
biner(baris, kolom) = 0;
else
biner(baris,kolom) =1;
end
end
end
subplot(1,2,2); imshow(biner);
subplot(1,2,1); imshow(img);

Hasil :

 

--------------------------------------------------------------------------------------

 Coding Program Citra Berwarna ke Abu-Abu dan Biner:

RGB=imread('C:\Image\dani.jpg');
YCBCR = rgb2ntsc(RGB);
Y=YCBCR(:,:,1); %Ekstraksi matriks Y
Cb=YCBCR(:,:,2); %Ekstraksi matriks Bc
Cr=YCBCR(:,:,3); %Ekstraksi matriks Br
subplot(3,2,1); imshow(RGB);
subplot(3,2,2); imshow(Y);
subplot(3,2,4); imshow(Cb);
subplot(3,2,6); imshow(Cr);

Hasil :