SAS中文论坛

标题: 请教online tutor 上的不放回抽样的一段代码 [打印本页]

作者: shiyiming 时间: 2013-8-2 21:35
标题: 请教online tutor 上的不放回抽样的一段代码
下面这段老是不太理解。似乎是顺着一个一个往下找，但为什么用samplesize/obsleft比较，请教请教，跪谢！

  data work.rsubset(drop=obsleft sampsize);
      sampsize=10;
      obsleft=totobs;
      do while(sampsize>0);
         pickit+1;
         if ranuni(0)<sampsize/obsleft then do;
            set sasuser.revenue point=pickit
               nobs=totobs;
            output;
            sampsize=sampsize-1;
         end;
         obsleft=obsleft-1;
      end;
      stop;
   run;

欢迎光临 SAS中文论坛 (http://www.mysas.net/forum/)