summaryrefslogtreecommitdiff
path: root/3176/CH4/EX4.8/Ex4_8.sce
blob: f1a4c96cdb2ecf02ffd3de72240bb4b513b35319 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
//Ex4_8
// Illustration of Jaggies in Image Shrinking
//Version : Scilab 5.4.1
// Operating System : Window-xp, Window-7
//Toolbox: Image Processing Design 8.3.1-1
//Toolbox: SIVP 0.5.3.1-2
//Reference book name : Digital Image Processing
//book author: Rafael C. Gonzalez and Richard E. Woods


clc;
close;
clear;
xdel(winsid())//to close all currently open figure(s).
a=imread("Ex4_8.tif");
figure,ShowImage(a,'Gray Image');
title('Original Image [1024 1024]','color','blue','fontsize',4);
//[M,N]=size(a);
b=imresize(a,[256 256],'bicubic');
//figure,ShowImage(b,'Gray Image');
//title('Resize Image [256 256] with Bicubic Interpolation');
[M,N]=size(b);
d=[];
f=[]
for i=1:N
    temp=b(:,i);      
    d=[d temp temp temp temp];  
end
for i=1:M
    temp=d(i,:);      
    f=[f;temp;temp;temp;temp];  
end
figure,ShowImage(f,'Gray Image');
title('Resize Image [1024 1024] with Pixels Replication','color','blue','fontsize',4);


///////////////////////////  Averaging Approach to Reduce Jaggies Effect  ////////////////
filt=fspecial('average',5);
a_filter=imfilter(a,filt);
b=imresize(a_filter,[256 256],'bicubic');
//figure,ShowImage(b,'Gray Image');
//title('Resize Image [256 256] with Bicubic Interpolation');
[M,N]=size(b);
d=[];
f=[]
for i=1:N
    temp=b(:,i);      
    d=[d temp temp temp temp];  
end
for i=1:M
    temp=d(i,:);      
    f=[f;temp;temp;temp;temp];  
end
figure,ShowImage(f,'Gray Image');
title('Resize Image [1024 1024] with Pixels Replication After Averaging','color','blue','fontsize',4);