function?y=kMeansCluster（mkisRand）
if?nargin<3?isRand=0;?
end
if?nargin<2?k=1;?
end
[maxRow?maxCol]=size（m）
if?maxRow<=k?
????y=[m?1:maxRow]
else
????%?initial?value?of?centroid
????if?isRand
????????p?=?randperm（size（m1））;?%?random?initialization
????????for?i=1:k
????????????c（i:）=m（p（i）:）?
????????end
????else
????????for?i=1:k
????????????c（i:）=m（i:）?%?sequential?initialization
????????end
????end
????temp=zeros（maxRow1）;?%?initialize?as?zero?vector
?