补齐前后观测

就是把每个code ，每个id 所对应的前后一个观测补齐

code	id	year	qtr	var
1	1	2001	1	1
1	1	2001	4	2
1	2	2002	3	3
1	2	2005	2	4
5	1	2007	1	19
5	1	2007	3	20
5	1	2008	1	21

code1补齐之后 ，  是这个样子的

code	id	year	qtr	var
1	1	2000	4	0
1	1	2001	1	1
1	1	2001	2	0
1	1	2001	3	0
1	1	2001	4	2
1	1	2002	1	0
1	2	2002	2	0
1	2	2002	3	3
1	2	2002	4	0
1	2	2005	1	0
1	2	2005	2	4
1	2	2005	3	0

1. data have;
   
2. input code id year qtr var;
   
3. datalines;
   
4. 1 1 2001 1 1
   
5. 1 1 2001 4 2
   
6. 1 2 2002 3 3
   
7. 1 2 2005 2 4
   
8. 5 1 2007 1 19
   
9. 5 1 2007 3 20
   
10. 5 1 2008 1 21
    
11. ; run;
    
12. 
    
13. data want;
    
14.     set have (rename=(var=var_ qtr=qtr_));
    
15.       if qtr_ = 1 then do;
    
16.         year = year - 1;  qtr = 4;  var = 0;     output;
    
17.         year = year + 1;  qtr = 1;  var = var_;  output;
    
18.                           qtr = 2;  var = 0;     output;
    
19.       end;
    
20.     if qtr_ = 4 then do;
    
21.         qtr = 3;   var = 0;     output;
    
22.         qtr = 4;   var = var_;  output;
    
23.         qtr = 1;   VAR = 0;     year = year+1; output;
    
24.     end;
    
25.     else if qtr_ = 2 or qtr_ = 3 then do;
    
26.         qtr = qtr_ - 1 ; var = 0;    output;
    
27.         qtr = qtr_;      var = var_; output;
    
28.         qtr = qtr_ + 1;  var = 0;    output;
    
29.     end;
    
30.     drop var_ qtr_;
    
31. run;

复制代码

yongyitian 发表于 2015-5-31 21:24

非常感谢   不过不好意思   可能举得那个例子不够明显   

请再看一个   原数据

code        id        year        qtr        var
1        1        2001        1        1
1        1        2001        2        2
1        1        2001        4        3
1        2        2005        2        4
5        1        2005        1        19
5        1        2005        2        20
5        1        2005        3        21


想的到的数据



code        id        year        qtr        var
1        1        2000        4        0
1        1        2001        1        1
1        1        2001        2        2
1        1        2001        3        0
1        1        2001        4        3
1        1        2002        1        0
1        2        2005        1        0
1        2        2005        2        4
1        2        2005        3        0
5        1        2004        4        0
5        1        2005        1        19
5        1        2005        2        20
5        1        2005        3        21
5        1        2005        4        0

yongyitian 发表于 2015-5-31 21:24

把每个code中id前后观测补齐，但是如果该观测前一期有观测，那么就把在前一期的观测补上

小鳄鱼a 发表于 2015-5-31 22:23
非常感谢   不过不好意思   可能举得那个例子不够明显   

请再看一个   原数据

这是两个完全不同的数据和结果。

在每一观测前面和后面各加一相邻的观测。 那么原数据中每两条观测之间最少要间

隔两个时间单位（time unit）。 否则用二楼的code做出的结果中会有重复的观测。

试试去掉这重复的观测。 如果还不是想要的结果，应考虑对问题作重新定义

1. data b;
   
2. set a;
   
3. if first.id then do;
   
4. if qtr=1 then do;
   
5. qtr=4; year=year-1;
   
6. output;
   
7. qtr=1;year=year+1;
   
8. output;
   
9. end;
   
10. else if qtr in (2,3,4) then do;
    
11. qtr=qtr-1;
    
12. output;
    
13. qtr=qtr+1;
    
14. output;
    
15. end;
    
16. end;
    
17. 
    
18. 
    
19. else if last.id then do;
    
20. output;
    
21. if qtr=4 then do;
    
22. qtr=1; year=year+1;
    
23. output;
    
24. end;
    
25. 
    
26. else if qtr in (1,2,3) then do;
    
27. qtr=qtr+1;
    
28. output;
    
29. end;
    
30. 
    
31. end;
    
32. 
    
33. else output;
    
34. 
    
35. by id notsorted;
    
36. 
    
37. run;
    
38. 
    
39. 
    
40. 
    
41. 
    
42. 
    
43. data b1;
    
44. set b;
    
45. year2=lag(year);
    
46. if first.id then do;
    
47. year1=year;
    
48. do qtr1=qtr to 4;
    
49. output;
    
50. end;
    
51. end;
    
52. 
    
53. else if not last.id then do;
    
54. 
    
55. if year-year2=1 then do;
    
56. year1=year;
    
57. do qtr1=1 to 4;
    
58. output;
    
59. end;
    
60. end;
    
61. 
    
62. else if year-year2>1 then do;
    
63. do year1=(year2+1) to year;
    
64. do qtr1=1 to 4;
    
65. output;
    
66. end;
    
67. end;
    
68. end;
    
69. 
    
70. end;
    
71. 
    
72. 
    
73. else if last.id then do;
    
74. if year-year2=1 then do;
    
75. year1=year;
    
76. do qtr1=1 to qtr;
    
77. output;
    
78. end;
    
79. end;
    
80. 
    
81. else if year-year2>1 then do;
    
82. do year1=(year2+1) to year;
    
83. do qtr1=1 to qtr;
    
84. output;
    
85. end;
    
86. end;
    
87. end;
    
88. 
    
89. end;
    
90. 
    
91. 
    
92. 
    
93. by id notsorted;
    
94. 
    
95. run;

复制代码

Imasasor 发表于 2015-6-1 16:35

非常感谢，但是var在某个时期的值相同的，我想的是如果该时期有数值，就保留原值，该观测前后如果没有观测，那么按照时间前后补上之后，补上的着一些var取值是0，而不是与该时期的一样。具体可以看看我后来的回复   。

小鳄鱼a 发表于 2015-6-1 17:03
非常感谢，但是var在某个时期的值相同的，我想的是如果该时期有数值，就保留原值，该观测前后如果没有观测 ...

最后数据集与中间数据集merge一下就行了

Imasasor 发表于 2015-6-1 22:59
最后数据集与中间数据集merge一下就行了

能否给改一下，对这个不大熟悉，谢谢