SAS 按顺序分组计数

求大神帮忙！
由于还有其他变量，简化如图所示：
已知x列与前面A-D的变量名，需要求得y列，y列为x列每个从1开始到下一个1之前数字的个数。

data test;
   input x @@;
cards;
1 1 2 3 1 2 1 2 1 2 1 1 2 3 4 5 6
;
run;

data want;
   set test;
   id=_n_;
run;

proc sort data=want;
   by descending id;
run;

data want;
   set want;
   retain y;
   dif=dif(x);
   if _n_=1 then y=x;
   else if dif>=0 then y=x;
   drop dif;
run;

proc sort data=want;
   by id;
run;

proc print;run;

l1i2n3i4n5g 发表于 2018-12-18 10:01
data test;
   input x @@;
cards;

谢谢大神