关于求一列数的中位数

ilovefushun

试着用http://bbs.chinaunix.net/thread-4216239-1-1.html这个帖子里8楼的代码，如果一列数是整数的话可以，但是我由一列数是小数：
100.223665
100.352905
100.198633
100.296956

用了上面的代码awk 'function w(v){l=asort(a,t);if(l%2){print v,t[int(l/2)+1]}else{print v,(t[int(l/2)+1]+t[int(l/2)])/2};delete a}FNR==1{if(f)w(f);f=FILENAME}{a[FNR]=$2}END{w(f)}' test.txt
中位数应该是100.2603105，但是显示的确是100.26，请问应该如何改，谢谢！

wh7211

回复 1# ilovefushun

1. cat 1
   
2. a 100.223665
   
3. b 100.352905
   
4. c 100.198633
   
5. d 100.296956
   
6. 
   
7. cat 2
   
8. e 1
   
9. f 3
   
10. g 9
    
11. h 8
    
12. i 5

复制代码

<<<awk4.0以下版本

1. awk 'function w(v){l=asort(a,t);if(l%2){printf("%s %d\n",v,t[int(l/2)+1])}else{printf("%s %.7f\n",v,(t[int(l/2)+1]+t[int(l/2)])/2)};delete a}FNR==1{if(f)w(f);f=FILENAME}{a[FNR]=$2}END{w(f)}' 1 2
   
2. 1 100.2603105
   
3. 2 5

复制代码

<<<awk4.0+

1. awk '{a[FILENAME][FNR]=$2}END{for(i in a){c=asort(a[i],b);d=int(c/2);if(c%2==0){printf("%s %.7f\n",i,(b[d]+b[d+1])/2)}else{printf("%s %d\n",i,b[d+1])}}}' 1 2
   
2. 1 100.2603105
   
3. 2 5

复制代码