%nc（歸一化相關系數）函數源碼
%計算NC（歸一化相關系數）
function?NC?=?nc（ImageAImageB）
if?（size（ImageA1）?~=?size（ImageB1））|（size（ImageA2）?~=?size（ImageB2））
??error（‘ImageA?<>?ImageB‘）;
??NC?=?0;
??return?;
end
ImageA=double（ImageA）;
ImageB=double（ImageB）;
M?=?size（ImageA1）;
N?=?size（ImageA2）;
d1=0?;
d2=0;
d3=0;
for?i?=?1:M
??for?j?=?1:N
????d1=d1+ImageA（ij）*ImageB（ij）?;
????d2=d2+ImageA（ij）*ImageA（ij）?;
????d3=d3+ImageB（ij）*ImageB（ij）?;
??end
end
NC=d1/（sqrt（d2）*sqrt（d3））;
return

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

?????文件???????6577??2012-05-28?16:43??XIN5.m

?????文件????????518??2012-05-03?10:55??ncdiaoyong.m

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

?????????????????7095????????????????????2