function?[?cen?]?=?cog（?I?）
%灰度重心法求中心點

[mn]=size（I）;
cen=zeros（mn）;
for?i=1:m
????a=0;
????b=0;
????for?j=1:n
????????if?I（ij）~=0
????????????a=a+j*I（ij）;
????????????b=b+I（ij）;
????????end?
????end
????c=round（a/b）;
????if?isnan（c）==0
????cen（ic）=1;
????end
end


end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件????????1582??2018-03-29?20:19??step1.m
?????文件?????????309??2018-03-29?20:19??cog.m