Excercise 3.docx

LAPORAN 2 TUGAS 3.4 / SIMULASI HISTOGRAM Disusun Untuk Memenuhi Tugas Mata Kuliah Praktikum Pengolahan Citra Digital Semester 6

Penyusun: JTD 3A

NO.ABSEN 22

NAMA YEREMIA TITO PRATAMA

NIM 1641160016

JARINGAN TELEKOMUNIKASI DIGITAL TEKNIK ELEKTRO POLITEKNIK NEGERI MALANG 2019

1. Terangkan / gambarkan konsep filtering pada citra dengan kalimat anda sendiri 2. Jelaskan konsep smoothing, sharpening, dan edge enhancement pada citra 3. Lakukan filtering, smothing, sharpening pada salah satu foto anda jika dimensi filter : a. 3 x 3 pixel b. 5 x 5 pixel c. 9 x 9 pixel d. M x N NIM 1641160016mn Jika nilai m atau n genap -> nilai + 1 Jika nilai m atau n = 1 atau 0 -> nilai = bulan ulang tahun Jika nilai m = n dan ganjil -> nilai m = n + 4 4. Menggunakan 1 image editor, lakukan a. Penggelapan b. Penerangan c. Penurunan kontras d. Penaikan kontras Pada 2 gambar grayscale dan simpan hasilnya 5. Gambar histogram tiap hasil no 4 dan simpulkan hasilnya (menggunakan Matlab) 6. Lakukan no 4 dengan kode matlab

Answer ! 1. Filtering adalah suatu proses dimana diambil sebagian sinyal dari frekuensi tertentu, dan membuang sinyal pada frekuensi yang lain. Filtering pada citra juga menggunakan prinsip yang sama, yaitu mengambil fungsi citra pada frekuensi-frekuensi tertentu dan membuang fungsi citra pada frekuensi-frekuensi tertentu. 2. a. Konsep smoothing adalah konsep dimana bertujuan untuk memperhalus kualitas gambar. Jadi jika tingkat dimensi filternya besar, semakin halus kualitas gambar membuat gambar semakin blur dan kurang jelas untuk dilihat. b. Konsep sharpening dilakukan unuk mempertajam warna, semakin besar dimensi filter yang digunakan maka semakin tajam gambar yang dihasilkan. c. Konsep edge enhancement adalah teknik merubah warna, dari warna asli ke warna grayscale. Semakin besar dimensi filter maka semakin tajam tingkat warna grayscale yang dihasilkan.

3. Smoothing a. 3 x 3 clc; close all; clear all; a=imread('a.jpg'); GaussianFilter = fspecial('gaussian', [3,3], 5); result = imfilter(a, GaussianFilter, 'same'); subplot(1,2,1), imshow(a); title('Sebelum Smoothing') subplot(1,2,2), imshow(result); title('Setelah Smoothing')

b. 5 x 5 clc; close all; clear all; a=imread('a.jpg'); GaussianFilter = fspecial('gaussian', [5,5], 5); result = imfilter(a, GaussianFilter, 'same'); subplot(1,2,1), imshow(a); title('Sebelum Smoothing') subplot(1,2,2), imshow(result); title('Setelah Smoothing')

c. 9 x 9 clc; close all; clear all; a=imread('a.jpg'); GaussianFilter = fspecial('gaussian', [9,9], 5); result = imfilter(a, GaussianFilter, 'same'); subplot(1,2,1), imshow(a); title('Sebelum Smoothing') subplot(1,2,2), imshow(result); title('Sesudah Smoothing')

d. 5 x 7 clc; close all; clear all; a=imread('a.jpg'); GaussianFilter = fspecial('gaussian', [5,7], 5); result = imfilter(a, GaussianFilter, 'same'); subplot(1,2,1), imshow(a); title('Sebelum Smoothing') subplot(1,2,2), imshow(result); title('Sesudah Smoothing')

Sharpening a. 3 x 3 clc; close all; clear all; a=imread('a.jpg'); sharpFilter = fspecial('unsharp'); sharp = imfilter(a, sharpFilter, 'replicate', [3,3], 5); subplot(1,2,1), imshow(a); title('Sebelum Sharpening') subplot(1,2,2), imshow(sharp); title('Sesudah Sharpening')

b. 5 x 5 clc; close all; clear all; a=imread('a.jpg'); sharpFilter = fspecial('unsharp'); sharp = imfilter(a, sharpFilter, 'replicate', [5,5], 5); subplot(1,2,1), imshow(a); title('Sebelum Sharpening') subplot(1,2,2), imshow(sharp); title('Sesudah Sharpening')

c. 9 x 9 clc; close all; clear all; a=imread('a.jpg'); sharpFilter = fspecial('unsharp'); sharp = imfilter(a, sharpFilter, 'replicate', [9,9], 5); subplot(1,2,1), imshow(a); title('Sebelum Sharpening') subplot(1,2,2), imshow(sharp); title('Sesudah Sharpening')

d. 5 x 7 clc; close all; clear all; a=imread('a.jpg'); sharpFilter = fspecial('unsharp'); sharp = imfilter(a, sharpFilter, 'replicate', [5,7], 5); subplot(1,2,1), imshow(a); title('Sebelum Sharpening') subplot(1,2,2), imshow(sharp); title('Sesudah Sharpening')

Edge Enhancement a. 3 x 3 clc; close all; clear all; a=imread('a.jpg'); gray = rgb2gray (a); If = nlfilter(gray,[3,3],'min(x(:))'); subplot(1,2,1), imshow(a); title('Sebelum Edge Enhancement') subplot(1,2,2), imshow(If); title('Setelah Edge Enhancement')

b. 5 x 5 clc; close all; clear all; a=imread('a.jpg'); gray = rgb2gray (a); If = nlfilter(gray,[5,5],'min(x(:))'); subplot(1,2,1), imshow(a); title('Sebelum Edge Enhancement') subplot(1,2,2), imshow(If); title('Sesudah Edge Enhancement')

c. 9 x 9 clc; close all; clear all; a=imread('a.jpg'); gray = rgb2gray (a); If = nlfilter(gray,[9,9],'min(x(:))'); subplot(1,2,1), imshow(a); title('Sebelum Edge Enhancement') subplot(1,2,2), imshow(If); title('Sesudah Edge Enhancement')

d. 5 x 7 clc; close all; clear all; a=imread('a.jpg'); gray = rgb2gray (a); If = nlfilter(gray,[5,7],'min(x(:))'); subplot(1,2,1), imshow(a); title('Sebelum Edge Enhancement') subplot(1,2,2), imshow(If); title('Sesudah Edge Enhancement')

4. Melakukan Penggelapan, Penerangan, Penurunan kontras, Penaikan kontras

5. Menggunakan Software Editor a. Brightness & Darken

clc; clear all; close all; a = imread('a.jpg'); g = rgb2gray(a); subplot(3,2,1) imshow (g); title ('Gambar Awal') subplot(3,2,2) imshow (g),imhist (g); c = imread('terang.jpg'); subplot(3,2,3) imshow (c); title ('Gambar Dicerahkan') subplot(3,2,4) imhist (c); d = imread('gelap.jpg'); subplot(3,2,5) imshow (d); title ('Gambar Digelapkan') subplot(3,2,6) imhist (d);

b. High & Low Contrast

clc; clear all; close all; a = imread('a.jpg'); g = rgb2gray(a); subplot(3,2,1) imshow (g); title ('GambarAwal') subplot(3,2,2) imshow (g),imhist (g); e = imread('tajam.jpg'); subplot(3,2,3) imshow (e); title ('Kontras Tinggi') subplot(3,2,4) imhist (e); f = imread('kurangtajam.jpg'); subplot(3,2,5) imshow (f); title ('KontrasRendah') subplot(3,2,6) imhist (f);

6. Menggunakan Coding a. Brightness & Darken

clc; clear all; close all; a = imread('broadway.jpg'); g = rgb2gray(a); subplot(1,6,1) imshow (g); title ('GambarAwal') subplot(1,6,2) imshow (g),imhist (g); c = imread('broadway.jpg'); br = c + 100; %brightness g = rgb2gray(br); subplot(1,6,3) imshow (br); title ('GambarDicerahkan') subplot(1,6,4) imhist (g); d = imread('broadway.jpg'); br = d - 100; %darken g = rgb2gray(br); subplot(1,6,5) imshow (br); title ('GambarDigelapkan') subplot(1,6,6) imhist (g);

b. High & Low Contrast

clc; clear all; close all; a = imread('jer2.jpg'); subplot(3,2,1) imshow (a); title ('GambarAwal') subplot(3,2,2) imshow (a), imhist (a); e = imread('jer2.jpg'); br = e * 5; %high contrast subplot(3,2,3) imshow (br); title ('GambarKontras Tinggi') subplot(3,2,4) imhist (br); f = imread('jer2.jpg'); br = f / 5; %low contrast subplot(3,2,5) imshow (br); title ('GambarKontrasRendah') subplot(3,2,6) imhist (br);