Program Pengambangan Dwi-aras dan Aras Jamak

Coding:

function [h] = ambang(f, t)
%    fungsi ambang Menentukan nilai ambang yang digunakan
%     untuk melakukan pengambangan
%     f = Citra Masukan berskala keabuan
%     t = nilai ambang
% Keluaran: g = citra biner
[m, n] = size(f);
for i=1 : m
    for j=1:n
if f(i,j) <= t
            h(i,j) = 0;
        else
            h(i,j) = 1;
        end
    end
end
end   %akhir fungsi

f = imread('c:\image\dog.png');
h = ambang(f, 100);


function [g] = arasjamak(f, t1, t2)
%    Pengambanan dengan dua nilai ambang
%     f = Citra berskala keabuan
%     t1 = nilai ambang bawah
%     t2 = nilai ambang atas
%     Masukan : f = citra biner
%    Keluaran: g = citra biner
[m, n] = size(f);
for i=1 : m
    for j=1:n
        if f(i,j) <= t1 || f(i,j) >= t2
            g(i,j) = 0;
        else
            g(i,j) = 1;
        end
    end
end
end   %akhir fungsi
f = imread('c:\image\dog.png');
g = arasjamak(f, 50, 100);
subplot(3,2,1);imshow(f), title('citra masukan')
subplot(3,2,2);imshow(g), title('citra keluaran dengan t1=50 dan t2=100')
subplot(3,2,4);imshow(1-h), title('citra keluaran') 

Hasilnya: