sas编程

求教：
id         year       export
1          2001        0
1          2002        1
1          2003        1
1          2004        0
1          2005        0
1          2006        1
1          2007        1
1          2008        1
1          2009        0
1          2010        1
1          2011        1
以上数据，id为企业个体，export为是否出口（1为出口，0为不出口），想统计企业每次出口的年限。如企业1,2002年开始出口，并连续出口两年，所以第一次出口的年限为2；第二次出口从2006年开始，持续三年，所以第二次出口的年限为3,；第三次出口从2010年开始，但由于样本时间到2011年，所以不知道以后的情况，也无法得出第三次出口的年限（换言之，每次出现0，就开始统计后面连续出口1的个数，并以下次再次碰到0结束统计）。基于此，想得到的数据为：
id      suv   startyear
1        2         2002
1        3         2006

liuliuqiu 发表于 2016-4-27 16:23
老师，您好！刚才您给我的程序，如果换了一个数据，结果好像有点问题
1 2001 0
1 2002 1

1. data b;
   
2.         set a;
   
3.         by id export notsorted;
   
4.         if first.id then sort=0;
   
5.         if first.export & export=1 then sort+1;
   
6. run;
   
7. 
   
8. data c;
   
9.         set b;
   
10.         by id sort;
    
11.         if (first.sort & export=0) | (last.sort & export=1) then delete;
    
12. run;
    
13. 
    
14. proc sql noprint;
    
15.         create table want as
    
16.         select distinct id,sum(export) as suv,min(year) as startyear from c
    
17.         group by id,sort having count(*)>1 & min(export)=0 order by id,startyear;
    
18. quit;

复制代码

1. data a;
   
2. input id  year export;
   
3. cards;
   
4. 1 2001 0
   
5. 1 2002 1
   
6. 1 2003 1
   
7. 1 2004 0
   
8. 1 2005 0
   
9. 1 2006 1
   
10. 1 2007 1
    
11. 1 2008 1
    
12. 1 2009 0
    
13. 1 2010 1
    
14. 1 2011 1
    
15. ;
    
16. run;
    
17. 
    
18. data b;
    
19.         set a;
    
20.         by id export notsorted;
    
21.         if first.export & export=1 then sort+1;
    
22. run;
    
23. 
    
24. data c;
    
25.         set b;
    
26.         by id sort;
    
27.         if (first.sort & export=0) | (last.sort & export=1) then delete;
    
28. run;
    
29. 
    
30. proc sql noprint;
    
31.         create table want as
    
32.         select distinct id,sum(export) as suv,min(year) as startyear from c group by sort having count(*)>1 order by startyear;
    
33. quit;

复制代码

孤单的我们 发表于 2016-4-27 15:28

老师，您好，刚才您给我的程序，如果换了一个数据，结果好像有点问题
1 2001 0
1 2002 1
1 2003 1
1 2004 0
1 2005 0
1 2006 1
1 2007 1
1 2008 1
1 2009 0
1 2010 1
1 2011 1
2 2001 0
2 2002 0
2 2003 1
2 2004 1
2 2005 0
2 2006 0
2 2007 1
2 2008 1
2 2009 0
2 2010 1
2 2011 1
如果数据是这样的，我想得到的数据是：
1  2  2002
1  3  2006
2  2  2003
2  2  2007
我忘了说样本里有不同给的个体，每个个体都按照上述办法依次进行处理

孤单的我们 发表于 2016-4-27 15:28

老师，您好！刚才您给我的程序，如果换了一个数据，结果好像有点问题
1 2001 0
1 2002 1
1 2003 1
1 2004 0
1 2005 0
1 2006 1
1 2007 1
1 2008 1
1 2009 0
1 2010 1
1 2011 1
2 2001 0
2 2002 0
2 2003 1
2 2004 1
2 2005 0
2 2006 0
2 2007 1
2 2008 1
2 2009 0
2 2010 1
2 2011 1
如果数据是这样的，想得到的结果是：
id      suv   startyear
1        2         2002
1        3         2006
2        2         2003
2        2         2007
但与程序做出的结果不同 。我忘了说样本里有不同的个体，每个个体都按照上述办法依次进行处理。还得麻烦您，不好意思。

liuliuqiu 发表于 2016-4-27 16:23
老师，您好！刚才您给我的程序，如果换了一个数据，结果好像有点问题
1 2001 0
1 2002 1

1. data a;
   
2. input id  year export;
   
3. cards;
   
4. 1 2001 0
   
5. 1 2002 1
   
6. 1 2003 1
   
7. 1 2004 0
   
8. 1 2005 0
   
9. 1 2006 1
   
10. 1 2007 1
    
11. 1 2008 1
    
12. 1 2009 0
    
13. 1 2010 1
    
14. 1 2011 1
    
15. 2 2001 0
    
16. 2 2002 0
    
17. 2 2003 1
    
18. 2 2004 1
    
19. 2 2005 0
    
20. 2 2006 0
    
21. 2 2007 1
    
22. 2 2008 1
    
23. 2 2009 0
    
24. 2 2010 1
    
25. 2 2011 1
    
26. ;
    
27. run;
    
28. 
    
29. data b;
    
30.         set a;
    
31.         by id export notsorted;
    
32.         if first.export & export=1 then sort+1;
    
33. run;
    
34. 
    
35. data c;
    
36.         set b;
    
37.         by id sort;
    
38.         if (first.sort & export=0) | (last.sort & export=1) then delete;
    
39. run;
    
40. 
    
41. proc sql noprint;
    
42.         create table want as
    
43.         select distinct id,sum(export) as suv,min(year) as startyear from c
    
44.                         group by id,sort having count(*)>1 & min(export)=0 order by startyear;
    
45. quit;

复制代码

孤单的我们 发表于 2016-4-27 15:12

老师，您好！
不好意思，还想请教您一个问题。
在原问题中，我设定最后年份的export如果为1，则由于不知道后来的情况而舍去。
现在将这个设定去掉，如何修改编程呢？例如：
id         year       export
1          2001        0
1          2002        1
1          2003        1
1          2004        0
1          2005        0
1          2006        1
1          2007        1
1          2008        1
1          2009        0
1          2010        1
1          2011        1
想得到的数据为：
id      suv   startyear
1        2         2002
1        3         2006
1        2         2010
非常感谢您！

liuliuqiu 发表于 2016-7-13 21:22
老师，您好！
不好意思，还想请教您一个问题。
在原问题中，我设定最后年份的export如果为1，则由于不知 ...

1. data a;
   
2. input id  year export;
   
3. cards;
   
4. 1 2001 0
   
5. 1 2002 1
   
6. 1 2003 1
   
7. 1 2004 0
   
8. 1 2005 0
   
9. 1 2006 1
   
10. 1 2007 1
    
11. 1 2008 1
    
12. 1 2009 0
    
13. 1 2010 1
    
14. 1 2011 1
    
15. 
    
16. ;
    
17. run;
    
18. 
    
19. data b;
    
20.         set a;
    
21.         by id export notsorted;
    
22.         if first.export & export=1 then sort+1;
    
23. run;
    
24. 
    
25. data c;
    
26.         set b;
    
27.         by id sort;
    
28.         if (first.sort & export=0) then delete;
    
29. run;
    
30. 
    
31. proc sql noprint;
    
32.         create table want as
    
33.         select distinct id,sum(export) as suv,min(year) as startyear from c
    
34.                         group by id,sort having count(*)>1  order by startyear;
    
35. quit;

复制代码

孤单的我们 发表于 2016-7-14 09:07

谢谢您，已经做出结果了

学习  stata没法做吗？？？？？？？？？