短数据变长数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

原始数据结构如下：
country  indicator  year1991  year1992  
A           xx              1             2            
A           yy              3             4                  
B           xx              5             6         
B           yy              7             8

我想变成下面的结构：
country year      xx    yy
A          1991      1     3
A          1992      2     4
B          1991      5     7
B          1992      6     8

以上仅是个例子，实际数据中国家和indicator更多。虽然我已经用最笨的方法搞定了（如果indicator只有一种我是会处理的），但是还是想知道用循环如何处理。
不知道哪位可以帮忙解决一下。非常感谢！

扫码加我 拉你入群

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

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

分享0 收藏2 回帖

关键词：长数据 Indicator Country Count year country 国家 如何

good question

已帮你@高手

你说的最笨的方法是RESHAPE吗

lavie8023 发表于 2015-4-29 10:11
你说的最笨的方法是RESHAPE吗

如果Indicator只有一种，reshape可以处理。因为我这里indicator有多个，我就是只能拆成一个一个的子数据文件，reshape完了再merge在一起，我的indicator有十几个呢，超级浪费时间。

SpencerMeng 发表于 2015-4-29 07:27
good question

已帮你@高手

谢谢！！

SpencerMeng 发表于 2015-4-29 07:27
good question

已帮你@高手

麻烦你多找几位大神

纯宇之恋 发表于 2015-4-30 11:00
麻烦你多找几位大神

好的

已@

等待正解~

纯宇之恋 发表于 2015-4-30 11:00
麻烦你多找几位大神

好的

已@

等待正解~

1. clear
   
2. input str25 (country  indicator)  year1991  year1992  
   
3. A           xx              1           2            
   
4. A           yy            3           4                  
   
5. B           xx            5           6         
   
6. B           yy              7           8
   
7. end
   
8. list
   
9. 
   
10. tempfile building150
    
11. save `"`building150'"', emptyok
    
12. 
    
13. 
    
14. levelsof indicator, local(levels) clean
    
15. display  "`levels'"
    
16. 
    
17. foreach k of local levels {
    
18. preserve
    
19. qui keep if indicator == "`k'"
    
20. qui reshape long year,i(country) j(mon)
    
21. qui rename year `k'
    
22. qui tempfile succ150
    
23. qui save `"`succ150'"',replace
    
24. qui merge 1:1 _n using `"`building150'"'
    
25. qui keep if _merge==3
    
26. qui drop _merge
    
27. qui save `"`building150'"',replace
    
28. restore
    
29. }
    
30. 
    
31. use "`building150'",clear
    
32. local myvars "`levels'"
    
33. keep country mon `myvars'
    
34. list

复制代码

SpencerMeng 发表于 2015-4-30 12:22
好的

已@

1. . do "D:\Temp\STD02000000.tmp"
   
2. 
   
3. . clear
   
4. 
   
5. . input str25 (country  indicator)  year1991  year1992  
   
6. 
   
7.                        country                  indicator    year1991    year1992
   
8.   1. A           xx              1           2            
   
9.   2. A           yy            3           4                  
   
10.   3. B           xx            5           6         
    
11.   4. B           yy              7           8
    
12.   5. end
    
13. 
    
14. . list
    
15. 
    
16.      +------------------------------------------+
    
17.      | country   indica~r   year1991   year1992 |
    
18.      |------------------------------------------|
    
19.   1. |       A         xx          1          2 |
    
20.   2. |       A         yy          3          4 |
    
21.   3. |       B         xx          5          6 |
    
22.   4. |       B         yy          7          8 |
    
23.      +------------------------------------------+
    
24. 
    
25. .
    
26. . tempfile building150
    
27. 
    
28. . save `"`building150'"', emptyok
    
29. file D:\Temp\ST_02000001.tmp saved
    
30. 
    
31. .
    
32. . **keep if indicator == "yy"
    
33. . levelsof indicator, local(levels) clean
    
34. xx yy
    
35. 
    
36. . display  "`levels'"
    
37. xx yy
    
38. 
    
39. .
    
40. . foreach k of local levels {
    
41.   2. preserve
    
42.   3. qui keep if indicator == "`k'"
    
43.   4. qui reshape long year,i(country) j(mon)
    
44.   5. qui rename year `k'
    
45.   6. qui tempfile succ150
    
46.   7. qui save `"`succ150'"',replace
    
47.   8. **list
    
48. . qui merge 1:1 _n using `"`building150'"'
    
49.   9. qui keep if _merge==3
    
50. 10. qui drop _merge
    
51. 11. qui save `"`building150'"',replace
    
52. 12. restore
    
53. 13. }
    
54. 
    
55. .
    
56. . use "`building150'",clear
    
57. 
    
58. . local myvars "`levels'"
    
59. 
    
60. . keep country mon `myvars'
    
61. 
    
62. . list
    
63. 
    
64.      +--------------------------+
    
65.      | country    mon   yy   xx |
    
66.      |--------------------------|
    
67.   1. |       A   1991    3    1 |
    
68.   2. |       A   1992    4    2 |
    
69.   3. |       B   1991    7    5 |
    
70.   4. |       B   1992    8    6 |
    
71.      +--------------------------+
    
72. 
    
73. .
    
74. end of do-file

复制代码