SAS的Data步计算错位一行，怎么解决？

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

DATA tmp;
input ID startmonth price;
cards;
1        198011    12
1        198012    13
1        198101    20
1        198102    25
1        198103    10
1        198104    40
2        201012    3
2        201101    20
2        201102    30
2        201103    5
2        201104    8
;
run;

proc sort data=tmp;
        by ID startmonth;
run;

/**assume data is sorted**/
data tmp2;
do i=0 by 1 until(last.id);
   set tmp;
   by id ;
   output;
   if first.id then max=price;
   if max<price then max=price;
        if first.id then drawback=price/max;
   if price/max<drawback then drawback=price/max;
end;

run;

proc print;run;

我是希望Max和Drawback能够上移一行，我的计算逻辑也是如果第一行，那么直接给max和drawback赋值了，怎么会下移一行，并且第一行出现缺失值呢？怎么解决？谢谢！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：data步 sas的 Data output sorted

Put Output Statement on the last.

data tmp2;
do i=0 by 1 until(last.id);
    set tmp;
    by id ;
    if first.id then max=price;
    if max<price then max=price;
         if first.id then drawback=price/max;
    if price/max<drawback then drawback=price/max;
        output;
end;
run;

1. data output1;
   
2. set tmp;
   
3. by id;
   
4. retain max drawback;
   
5. if first.id then do;max=price;drawback=price/max;end;
   
6. else if max<price then max=price;
   
7. else if price/max<drawback then drawback=price/max;
   
8. run;

复制代码