判断条件根据实际情况修改

我改成这样..还是有两个重复的1生成



data ahdata.f3;
set ahdata.f3;
array jc(*) jc1-jc172;
array buy(*) buy1-buy172;
array ml10jc(*)  ml10jc1-ml10jc172;
array sl10jc(*)  sl10jc1-sl10jc172;
do i=1 to dim(jc);
if label_i>=i-10 then buy(i)=0;else
if jc(i)<ml10jc(i)-2*sl10jc(i) then buy(i)=1;else
buy(i)=0;
if buy(i)=1 then label_i=i;
end;
run;

真心想不到办法....还有人会么

data test;
   array b(6);
   do i=1 to 30;
      do j=1 to 6;
             b(j)=ranuni(0)>0.5;
          end;
          output;
        end;
        drop i j;
run;

*** b1, b2, ... , b6是原来的数， c1, c2, ... c6是处理之后的数。；

%let num=6;
data wanted;
    array b(&num);
        array c(&num);
        array flg(&num);
        array count(&num);
        set test;

        do i=1 to &num;
           c(i)=b(i);
           if count(i)<10 and flg(i) then c(i)=0;
           if c(i)=1 then do; count(i)=0; flg(i)+1; end;
           else count(i)+1;
        end;
        drop i flg: count:;
run;
          
      

再一次感谢大神...能加个好友或者留个联系方式么