function?Y=Max_CCM（ABhl）
%?掩模A在原圖的起始行，列分別是h，l；將A在B里面平滑，得到A在B里面的相對移動距離
%?行移動I個象素，列運動J象素
A=double（A）;??B=double（B）;?
[wv]=size（A）;
K=10;??%變化在一定的區域

for?m=1:2*K;??%%%?行變化范圍
????for?n=1:2*K??%%%?列變化范圍
????????C=B（h+m-K:h+m-K+w-1l+n-K:l+n-K+w-1）;??
????????a=abs（A.*conj（C））;??%%%?分子
%?????????a=A.*conj（C）;??%%%?分子
????????b=A.*conj（A）;??%%%?分母一
????????c=C.*conj（C）;??%%%　分母二
????????gama（mn）=sum（a（:））/sqrt（sum（b（:））*sum（c（:）））;??%%%?相干系數????
%?????????gama（mn）=abs（sum（a（:）））/sqrt（sum（b（:））*sum（c（:）））;??%%%?相干系數??
???end
end
%?figure???imagesc（gama）??title（‘范數距離‘）;??colormap（gray）;??axis?image?off;??IMPIXELINFO;
[idxidy]=find（gama==max（gama（:）））;??%%%?求最大相干系數所在的位置
I=idx-K;%mn的值不是相對滑動的值。m，n為?11的時候X?Y已相對滑動K個單位。
J=idy-K;
%?I=idx-1;
%?J=idy-1;
Y=[I?J];

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

?????文件????????941??2012-10-23?10:05??Max_CCM1.m

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

??????????????????941????????????????????1