san_filt.m

a=imread('Fig2.07(a).jpg');
a=double(a);
s=9;    % size of averaging mask.it must be odd no.
b=ones(s)
y=spatialfilt(a,b);
imshow(a,[]);
title('original');
figure
imshow(y,[]);
title('filtered image');