求帮助，如何抽取每块第二列的最后一个数

蓝色未央

现在有这么几排数目：
ENSMUSG00000000001      E001    1       0.0457631384672612
ENSMUSG00000000001      E002    1       0.0640984552169336
ENSMUSG00000000001      E003    1       0.120343325937712
ENSMUSG00000000001      E004    1       0.0176373607894759
ENSMUSG00000000001      E005    1       0.0203287162302932
ENSMUSG00000000028      E001    NA      -3.99226429836622
ENSMUSG00000000028      E002    1       0.0152891147956258
ENSMUSG00000000028      E003    1       0.00662807369049341
ENSMUSG00000000037      E001    NA      -0.292347728633979
ENSMUSG00000000037      E002    NA      -0.0972043056221663
ENSMUSG00000000037      E003    NA      -0.0972043056221663
ENSMUSG00000000037      E004    NA      -0.0972043056221663
ENSMUSG00000000037      E005    NA      -0.0972043056221663
ENSMUSG00000000037      E006    NA      4.9804313612377
ENSMUSG00000000037      E007    1       -0.0818846793983751
ENSMUSG00000000037      E008    1       0.0306955939521458
ENSMUSG00000000037      E009    NA      0.121196534363604

我想取出每个模块第二列的最大数的那一行：
就好比最后的这样：
ENSMUSG00000000001      E005    1       0.0203287162302932
ENSMUSG00000000028      E003    1       0.00662807369049341
ENSMUSG00000000037      E009    NA      0.121196534363604

求教大神代码应该如何编写？？？

cjaizss

1. 
   
2. awk '!NF{next}!($1 in a){a[$1]=$NF;b[$1]=$0;next}$NF>a[$1]{a[$1]=$NF;b[$1]=$0;}END{for( i in b){print b[i]}}'
   

复制代码

cjaizss

1. 
   
2. awk '!NF{next}!($1 in a){a[$1]=$NF;b[$1]=$0;next}$NF>a[$1]{a[$1]=$NF;b[$1]=$0;}END{for( i in b){print b[i]}}'
   

复制代码

moperyblue

1. sort -k1.8n -k2.2n|sed -r 'N;/(\S+\b).*\n\1/!P;D'
   
2. sort -k1.8n -k2.2n|awk 'NR>1&&$1!=a{print s}{a=$1;s=$0}END{print}'
   
3. awk '$2>a[$1]{a[$1]=$2;b[$1]=$0}END{for(i=1;i<=asorti(b,c);i++)print b[c[i]]}'

复制代码

jason680

for sorted data only ...

$ awk 'function p(){if(k)print last}{if(k!=$1)p();k=$1;last=$0}END{p()}' FILE
ENSMUSG00000000001      E005    1       0.0203287162302932
ENSMUSG00000000028      E003    1       0.00662807369049341
ENSMUSG00000000037      E009    NA      0.121196534363604

reyleon

1. awk '$2>a[$1]{a[$1]=$2;b[$1]=$0}!x[$1]++{y[++n]=$1}END{for(i=1;i<=n;i++)print b[y[i]]}' file

复制代码

Zivix0406

1. sort -t " " -k 2 -r  file | awk '!a[$1]++'

复制代码

结果出来是倒序的不知道可以不

ENSMUSG00000000037      E009    NA      0.121196534363604
ENSMUSG00000000001      E005    1       0.0203287162302932
ENSMUSG00000000028      E003    1       0.00662807369049341

sunzhiguolu

1. perl -ane '{push(@{$h{$F[0]}},$_)}END{print $h{$_}->[-1] for keys %h}' f

复制代码

ENSMUSG00000000037      E009    NA      0.121196534363604
ENSMUSG00000000028      E003    1       0.00662807369049341
ENSMUSG00000000001      E005    1       0.0203287162302932

fh21_xuejinlian

awk '{i=$1;if(a<$2){a=$2;b=$0}}END{for(j=1;j<=asorti(a,c);j++)print b[c[j]]}' file
ENSMUSG00000000001      E005    1       0.0203287162302932
ENSMUSG00000000028      E003    1       0.00662807369049341
ENSMUSG00000000037      E009    NA      0.121196534363604

fh21_xuejinlian

awk '{i=$1;if(a[i]<$2){a[i]=$2;b[i]=$0}}END{for(j=1;j<=asorti(a,c);j++)print b[c[j]]}' file
ENSMUSG00000000001      E005    1       0.0203287162302932
ENSMUSG00000000028      E003    1       0.00662807369049341
ENSMUSG00000000037      E009    NA      0.121196534363604