%計算平均梯度
clear?all
[filenamepathname]=uigetfile（‘*.*‘‘圖像‘）;
A=imread（[pathnamefilename]）;
%s=size（size（A））;

%if?s（2）==3
%????A=rgb2gray（A）;
%end
A=double（A）;
[MNK]=size（A）;
sum=0;

for?i=1:M-1
????for?j=1:N-1
????????diffX（ij）=A（ij）-A（i+1j）;
????????diffY（ij）=A（ij）-A（ij+1）;
????????w=sqrt（（（diffX（ij））^2+（diffY（ij））^2）/2）;
????????sum=sum+w;
????end
end
AVEGRAD=sum/（（M-1）*（N-1））

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????422??2011-05-23?11:14??評價指標\AverageGradent.m

?????文件????????620??2011-05-23?15:22??評價指標\Corr.m

?????文件????????688??2008-08-14?11:31??評價指標\cross_entropy.m

?????文件????????491??2008-08-14?11:01??評價指標\entropy_.m

?????文件????????697??2008-08-14?11:08??評價指標\joint_entropy.m

?????文件????????388??2011-05-23?14:55??評價指標\MSE.m

?????文件???????1143??2011-05-03?11:15??評價指標\mutual_information.m

?????文件???????1939??2011-05-23?10:34??評價指標\MyEvaluate.m

?????文件????????466??2011-05-23?11:39??評價指標\PSNR.m

?????文件????????592??2011-05-23?11:24??評價指標\RMSE.m

?????文件????????638??2011-05-23?11:24??評價指標\SNR.m

?????文件????????636??2011-05-23?11:34??評價指標\SpaceFrequency.m

?????文件????????490??2011-05-23?11:26??評價指標\StandardDeviation.m

????..A.SH.??????5632??2011-10-22?12:35??評價指標\Thumbs.db

?????目錄??????????0??2012-03-23?14:51??評價指標

-----------?---------??----------?-----??----

????????????????14842????????????????????15