SAS 编程求教：根据实时评分输出累计数

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

假设有以下数据：

time	id	score
1	1	4
12	2	3
33	3	3
45	4	5
55	1	5
67	3	4
87	5
88	6	1
89	2	2
120	3	3

time是solution的提交时间，id是solution编号，score是对solution的评分。评阅人可以重复对相同solution评分，如solution1 在time=1和time=55时被分别评分4和5。现想根据此实时评分结果输出累计得分数，如下：

time	id	score	accumulate_1	accumulate_2	accumulate_3	accumulate_4	accumulate_5
1	1	4	0	0	0	1	0
12	2	3	0	0	1	1	0
33	3	3	0	0	2	1	0
45	4	5	0	0	2	1	1
55	1	5	0	0	2	0	2
67	3	4	0	0	1	1	2
87	5		0	0	1	1	2
88	6	1	1	0	1	1	2
89	2	2	1	1	0	1	2
120	3	3	1	1	1	0	2

难点在于，有些solution是被重复打分的，后面的打分会覆盖前面的打分信息，且要根据新的打分信息更新累计数，即原来的得分的累计数要减一，新的得分的累计数要加一。请教各位如何实现？谢谢大家。

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：累计数 Solution solutio Soluti score solution 信息

累计得分数是怎么计算的？

calsunny 发表于 2015-8-5 05:40
累计得分数是怎么计算的？

就是对应的变量的累积和。

1. data have;
   
2. input time id score;
   
3. datalines;
   
4. 1        1        4
   
5. 12        2        3
   
6. 33        3        3
   
7. 45        4        5
   
8. 55        1        5
   
9. 67        3        4
   
10. 87        5        .
    
11. 88        6        1
    
12. 89        2        2
    
13. 120        3        3
    
14. ; run;
    
15. 
    
16. data want;
    
17.    set have;
    
18.    array accu_{5} ( 0 0 0 0 0);
    
19.    array last_score{6} (0 0 0 0 0 0);
    
20.    retain accu_ : last_score;
    
21.    if   1<= score <= 5 then do;
    
22.      accu_[score]+1 ;
    
23.        if last_score[id] > 0 and last_score[id] ^= score then do;
    
24.                 lastScore = last_score[id];
    
25.          accu_[lastscore] = accu_[lastscore] - 1;
    
26.        end;
    
27.    end;
    
28.            last_score[id] = score;
    
29.    drop last_score: lastScore ;
    
30. run;
    
31. 
    
32. proc print data= want; title 'want'; run; title;

复制代码