急求！横向排序并生成排名序列

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

district	in1	in2	in3	in4
1	6862	3644	11274	327
2	1008	560	1300	237
3	37188	5630	3951	765
4	8291	8108	3541	174

数据大概是这样的形式，源数据有80多列，数据为每个产业的就业人数叫做Xi现在我需要计算一个指标是每个地区的就业人数按照从小到大的顺序排列，即排成X1<X2<……<Xn的形式，然后计算∑（i*Xi）以第一行为例，就是要得到1*327+2*3644+3*6862+4*11274的答案
求问这个是怎么编程序啊？？？


我试了用foreach命令
foreach i of numlist 1/83{
gen x`i'=`i'*in`i'
}
egen y=rowtotal(x1-x83)

但是这样算出来的只是1*6862+2*3644+3*11274+4*327的答案，这里的顺序没有按照升序排列


请问大神如何修改程序！！急求！！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：就业人数 从小到大 Istr IST Dis 就业

每一行都要运算？还是只是以第一行为标准？

ywh19860616 发表于 2014-11-7 17:20
每一行都要运算？还是只是以第一行为标准？

每一行都要，我只是以第一行为例子，怕我自己文字表达不清楚。。。

junqinryoma 发表于 2014-11-7 17:20
每一行都要，我只是以第一行为例子，怕我自己文字表达不清楚。。。

1. clear
   
2. input district in1 in2 in3 in4
   
3. 1 6862 3644 11274 327
   
4. 2 1008 560 1300 237
   
5. 3 37188 5630 3951 765
   
6. 4 8291 8108 3541 174
   
7. end
   
8. 
   
9. xpose, clear varname
   
10. foreach x of varlist v1-v4 {
    
11. sort `x'
    
12. egen v`x' = total(`x'*_n)
    
13. }

复制代码

这样？

1. clear
   
2. input district in1 in2 in3 in4
   
3. 1 6862 3644 11274 327
   
4. 2 1008 560 1300 237
   
5. 3 37188 5630 3951 765
   
6. 4 8291 8108 3541 174
   
7. end
   
8. 
   
9. xpose, clear varname
   
10. foreach x of varlist v1-v4 {
    
11. sort `x'
    
12. egen v`x' = total(`x'*_n)
    
13. }
    
14. 
    
15. local new = _N + 1
    
16. set obs `new'
    
17. 
    
18. forv i = 1/4 {
    
19. replace v`i' = vv`i'[1] in `=_N'
    
20. }
    
21. 
    
22. keep v1 v2 v3 v4
    
23. xpose,clear

复制代码

ywh19860616 发表于 2014-11-7 20:00

算出来还是不对啊( >﹏<。)～求大神再指教= =

junqinryoma 发表于 2014-11-8 10:08
算出来还是不对啊( >﹏

1. clear
   
2. input district in1 in2 in3 in4
   
3. 1 6862 3644 11274 327
   
4. 2 1008 560 1300 237
   
5. 3 37188 5630 3951 765
   
6. 4 8291 8108 3541 174
   
7. end
   
8. 
   
9. drop district
   
10. xpose, clear varname
    
11. 
    
12. foreach x of varlist v1-v4 {
    
13. sort `x'
    
14. egen v`x' = total(`x'*_n)
    
15. }
    
16. 
    
17. local new = _N + 1
    
18. set obs `new'
    
19. 
    
20. forv i = 1/4 {
    
21. replace v`i' = vv`i'[1] in `=_N'
    
22. }
    
23. 
    
24. 
    
25. 
    
26. keep v1 v2 v3 v4
    
27. xpose,clear
    
28. rename v5 myresult
    
29. 
    
30. 
    
31. // check the results
    
32. di 327*1 + 3644*2 + 6862*3 + 11274*4
    
33. di 237*1 + 560*2 + 1008*3 + 1300*4

复制代码

ps：Sorry for my mistake

1. . list
   
2. 
   
3.      +---------------------------------------+
   
4.      |  v1      v2     v3      v4   myresult |
   
5.      |---------------------------------------|
   
6.   1. | 327   11274   3644    6862      73297 |
   
7.   2. | 237    1300    560    1008       9581 |
   
8.   3. | 765    3951   5630   37188     174309 |
   
9.   4. | 174    3541   8108    8291      64744 |
   
10.      +---------------------------------------+
    
11. 
    
12. 
    
13. . // check the results
    
14. . di 327*1 + 3644*2 + 6862*3 + 11274*4
    
15. 73297
    
16. 
    
17. . di 237*1 + 560*2 + 1008*3 + 1300*4
    
18. 9581

复制代码

ywh19860616 发表于 2014-11-8 10:28
ps：Sorry for my mistake

可以了！！真是太感谢了！！！