clear??
clc??
f=imread（‘lena7.jpg‘）;??
[mnc]=size（f）
f2=im2double（f）;?%將f轉換歸一化的double類圖像，然后進行濾波??
w=fspecial（‘laplacian‘0）;??
g1=imfilter（f2w‘replicate‘）;??
g=f2-g1;??

diff_f=0;

for?i=1:m-1;
????for?j=1:n-1;
????????%Ix=I（i+1j）-I（ij）;
????????%Iy=I（ij+1）-I（ij）;
????????diff_f=diff_f+abs（f2（i+1j）-f2（ij））+abs（f2（i+1j）-f2（ij））;
????end
end

diff_f=d