kclus function

K-clustering