怎么把一个数据文件拆分成两个？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

A B 是两个人。现在有两个dta文件，分别是今年的和去年的。
今年
变量x  y  z       t
A     1  2  3   2015
B     6  7  8   2015

去年
变量 x  y  z      t
A      2  3  4   2014
B      7  8  9   2014
如何整理为两个文件：
A
变量  x  y  z     t
         1  2  3  2015
         2  3  4  2014
B
变量  x  y  z     t
         6  7  8  2015
         7  8  9  2014

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：数据文件 DTA文件 dta 2014 如何

楼主好，其实这个问题并不难。

巧用preserve和restore连用会更简便。

代码如下：

1. *先生成并保存一份今年的数据
   
2. clear
   
3. inp str2 id x y z t
   
4. a 1 2 3 2015
   
5. b 6 7 8 2015
   
6. end
   
7. save afteryear,replace
   
8. *生成往年的数据，并并入今年的数据
   
9. clear
   
10. inp str2 id x y z t
    
11. a 2 3 4 2014
    
12. b 7 8 9 2014
    
13. end
    
14. 
    
15. append using afteryear //并入今年的数据
    
16. 
    
17. sort id
    
18. 
    
19. preserve
    
20. drop if id=="a"
    
21. save  varb,replace
    
22. resore
    
23. 
    
24. preserve
    
25. drop if id=="b"
    
26. save  vara,replace
    
27. resore
    
28. 
    
29. use vara,clear
    
30. use varb,clear

复制代码

SpencerMeng 发表于 2015-4-21 16:43
楼主好，其实这个问题并不难。

巧用preserve和restore连用会更简便。

如果我不仅是a b 而是a b c d e f g h i j k l m n o p q r s t u v w x y z呢 是不是要用好多个drop?

HannibalJ 发表于 2015-4-27 09:24
如果我不仅是a b 而是a b c d e f g h i j k l m n o p q r s t u v w x y z呢 是不是要用好多个drop?

不好意思，楼主，回复晚了。。

如果您变量多的话，用循环语句生产多个dta吧：

代码如下：

1. *先生成并保存一份今年的数据
   
2. clear
   
3. inp str2 id x y z t
   
4. a 1 2 3 2015
   
5. b 6 7 8 2015
   
6. c 2 3 5 2015
   
7. end
   
8. save afteryear,replace
   
9. *生成往年的数据，并并入今年的数据
   
10. clear
    
11. inp str2 id x y z t
    
12. a 2 3 4 2014
    
13. b 7 8 9 2014
    
14. c 3 4 6 2014
    
15. end
    
16. 
    
17. append using afteryear //并入今年的数据
    
18. 
    
19. sort id
    
20. 
    
21. levelsof id,local(level1)
    
22. 
    
23. foreach x of local level1 {
    
24. preserve
    
25. keep if id=="`x'"
    
26. save file`x',replace  //注意file与‘x'之间没有空格
    
27. restore
    
28. }
    
29. 
    
30. use filea,clear
    
31. use fileb,clear
    
32. use filec,clear

复制代码