SAS关于几种特殊输入方式的提问

想请问以下几种数据怎么输入

（1）

P 77 76 74 72 78

D80 84 88 87 90
结果要是这样的

group	ID	score
P	1	77
P	2	76
P	3	74
P	4	72
P	5	78
D	1	80
D	2	84
D	3	88
D	4	87
D	5	90

（2）

P 5 77 76 74 72 78

D8 80 84 88 87 85 90 92 81

(5、8是P、D的id个数)
（3）

P 77 76 74 72 78

D80 84 88 87 85 90 92 81

（不告知个数）




希望大神帮忙，谢谢！

第一种好弄

1. data a;
   
2. input a $1 s1-s5 @;
   
3. cards;
   
4. P 1 3 4 5 6
   
5. D 6 88 98 98 100
   
6. ;
   
7. run;
   
8. 
   
9. data b(keep= id group score);
   
10. set a;
    
11. array aa(*) s1-s5;
    
12. do id=1 to dim(aa);
    
13. group=a;
    
14. score=aa(id);
    
15. output;
    
16. end;
    
17. run;

复制代码

第一题用数组
第二题用DO循环INPUT
第三题用INPUT函数

1. DATA PROBLEM1;
   
2.         INPUT GROUP $ S1-S5;
   
3.         ARRAY S[5];
   
4.         DO ID=1 TO 5;
   
5.                 SCORE = S[ID];
   
6.                 OUTPUT;
   
7.         END;
   
8.         KEEP ID GROUP SCORE;
   
9. DATALINES;
   
10. P 77 76 74 72 78
    
11. D 80 84 88 87 90
    
12. ;
    
13. 
    
14. DATA PROBLEM2;
    
15.         INPUT GROUP $ N @@;
    
16.         DO ID=1 TO N;
    
17.                 INPUT SCORE @;
    
18.                 OUTPUT;
    
19.         END;
    
20.         KEEP GROUP SCORE ID;
    
21. DATALINES;
    
22. P 5 77 76 74 72 78
    
23. D 8 80 84 88 87 85 90 92 81
    
24. ;
    
25. 
    
26. DATA PROBLEM3;
    
27.         INPUT TEST $ @@;
    
28.         RETAIN GROUP;
    
29.         IF TEST='P' OR TEST='D' THEN DO;
    
30.                 GROUP=TEST;
    
31.                 DELETE;
    
32.         END;
    
33.         ELSE SCORE=INPUT(TEST,2.);
    
34.         DROP TEST;
    
35. DATALINES;
    
36. P 77 76 74 72 78
    
37. D 80 84 88 87 85 90 92 81
    
38. ;

复制代码