请教高手，有这么一组数据：co公司date1报告日期date2备案日期shares股份数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请教高手，我有这么一组数据：co－公司，date1－报告日期， date2－备案日期， shares－股份数
Co     date1     date2  shares
1001 199406 199409 600
1001 199406 199412 1200
1001 199406 199503 1200
1001 199503 199506 1200
1001 199503 199509 1200
1005 199110 199203 6500
1005 199110 199206 6500
1005 199204 199206 7500
1005 199204 199209 7500
第一步想增加一个变量date3，让其等于每个公司每个报告日期的最后一个备案日期（date2）；
Co       date1    date2 shares date3
1001 199406 199409 600 199503
1001 199406 199412 1200 199503
1001 199406 199503 1200 199503
1001 199503 199506 1200 199509
1001 199503 199509 1200 199509
1005 199110 199203 6500 199206
1005 199110 199206 6500 199206
1005 199204 199206 7500 199209
1005 199204 199209 7500 199209
第二步，只保留每个公司每个报告日期的第一行数据：
Co    date1     date2 shares date3
1001 199406 199409 600 199503
1001 199503 199506 1200 199509
1005 199110 199203 6500 199206
1005 199204 199206 7500 199209
真正目的就是：只需要每个公司（co）每个报告日期(date1)的第一个备案日期(date2)的数据（就是每个公司（co）每个报告日期(date1)的第一行数据），但是还想知道每个公司每个报告日期的最后一个备案日期是几号。上面只是摘了一组数据出来，原数据很大。

烦请高手帮忙，如何能达到这个目的？

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：Shares share date 请教高手 ATE

1. data test;
   
2. input Co_1 $     date1_1:yymmn6. date2_1:yymmn6.  shares_1;
   
3. format date1_1 date2_1 yymmn6.;
   
4. datalines;
   
5. 1001 199406 199409 600
   
6. 1001 199406 199412 1200
   
7. 1001 199406 199503 1200
   
8. 1001 199503 199506 1200
   
9. 1001 199503 199509 1200
   
10. 1005 199110 199203 6500
    
11. 1005 199110 199206 6500
    
12. 1005 199204 199206 7500
    
13. 1005 199204 199209 7500
    
14. ;
    
15. run;
    
16. 
    
17. proc sort data=test;by Co date1;run;quit;
    
18. 
    
19. data test1;
    
20.         retain Co date1 date2 shares date3;
    
21.         set test;
    
22.         by Co_1 date1_1;
    
23.         if first.date1_1 then do;
    
24.                 Co=Co_1;
    
25.                 date1=date1_1;
    
26.                 date2=date2_1;
    
27.                 shares=shares_1;
    
28.         end;
    
29.         if last.date1_1 then do;
    
30.                 date3=date2_1;
    
31.                 output;
    
32.         end;
    
33.         keep Co date1 date2 shares date3;
    
34.         format date1 date2 date3 yymmn6.;
    
35. 
    
36. 
    
37. run;

复制代码

希望对你有帮助

向2楼学习 呵呵

data a;
input Co date1:yymmn6. date2 :yymmn6. shares;
format date1 date2 yymmn6.;
datalines;
1001 199406 199409 600
1001 199406 199412 1200
1001 199406 199503 1200
1001 199503 199506 1200
1001 199503 199509 1200
1005 199110 199203 6500
1005 199110 199206 6500
1005 199204 199206 7500
1005 199204 199209 7500
;
run;

proc sort data=a;
  by co date1 descending date2;
run;

data a;
  set a;
  by co date1 descending date2;
  retain date3;
  if first.date1 then date3=date2;
  if last.date1;
  format date3 yymmn6.;
run;

4楼的办法好，学习了

4楼很简洁 又见识了retain的好用

下面这个效率低
proc sql;
select distinct(co) , date1, max(date2) as date3 format yymmn6.  from a group co,date1;
quit;

data crackman;
input co date1 date2 shares@;
cards;
1001 199406 199409 600
1001 199406 199412 1200
1001 199406 199503 1200
1001 199503 199506 1200
1001 199503 199509 1200
1005 199110 199203 6500
1005 199110 199206 6500
1005 199204 199206 7500
1005 199204 199209 7500
;
run;
proc sql;
create table result  as  select co,date1,date2,shares , max(date2) as date3 from crackman group by co,date1;
data crackman1;
set result;
if date2=date3;
run;
proc print;
run;

谢谢各位的帮忙，还是比较喜欢四楼的方法。
sql语句太费时间了，由于我的数据非常大，用data语句相对更省时间。
无论如何，都非常感谢各位！！！