用K－Means聚类法怎么写程序语言？急

shiyiming

查了好多书都没有
写论文要用
求助
具体的语言程序
谢谢 <!-- s:roll: --><img src="{SMILIES_PATH}/icon_rolleyes.gif" alt=":roll:" title="Rolling Eyes" /><!-- s:roll: -->

shiyiming

proc standard mean=0 std=1 out=stan;
      var v1-v10;
   run;

   proc fastclus data=stan out=clust maxclusters=3;
      var v1-v10;
   run;

   proc candisc out=can;
      var v1-v10;
      class cluster;
   run;

   proc plot;
      plot can2*can1=cluster;
   run;