请教一个SAS程序求和的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

现在有这样一个数据集，变量为PnL:

Data Test;
input PnL @@;
cards;
64 -81 -91 6 -11 2 58 -93 -92 27 -123 -110 41 26 75 -37
;
run;

我想把这个PnL进行累加生成新的数据集，规则是

• 按照观测的顺序从上到下依次累加
• 正负号相同的相加在一起生成一个新的观测
  

生成的数据集应该是这样的：请问应该怎么写？感谢！！
64
-172（=-81-91）
6
-11
60（=2+58）
-185（=-92-92）
27
-233（=-123-110）
142（=41+26+75）
-37

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：sas程序 cards Input card Data 程序

求币啦{:2_31:}

1. data test;
   
2.         input PnL @@;
   
3. datalines;
   
4. 64 -81 -91 6 -11 2 58 -93 -92 27 -123 -110 41 26 75 -37
   
5. ;
   
6. run;
   
7. 
   
8. data result;
   
9.         set test;
   
10.         retain temp grp;
    
11.         sign=sign(PnL);
    
12.         if _n_=1 then do;
    
13.                 grp=1;
    
14.                 temp=sign;
    
15.         end;
    
16.         else do;
    
17.                 temp=lag(sign);
    
18.                 if sign^=temp then do;
    
19.                         grp=grp+1;
    
20.                 end;
    
21.         end;
    
22. run;
    
23. 
    
24. proc sql noprint;
    
25.         create table final as
    
26.         select sum(PnL) as PnL from result group by grp;
    
27. quit;

复制代码

zhengbo8 发表于 2015-10-23 22:28
求币啦

实测管用，谢谢啦！
话说怎么给币？

Try this:

Data x;
Set x;
Retain cumx;
If _n_ = 1 then cumx =0;
If x*lag (x) <0 then cumx = 0;
Cumx = cumx + x;
Run;

johnpark1 发表于 2015-10-24 22:25
Try this:

Data x;

感谢！这样很简洁 但是没有把中间的求和项去掉