请教awk将一列转为下面的两列格式

chenjiali1

A文件如下所示：
ENSMUSG00000000001 190
ENSMUSG00000000001 153
ENSMUSG00000000002 129
ENSMUSG00000000003 128
ENSMUSG00000000003 157
ENSMUSG00000000003 141
ENSMUSG00000000004 42
ENSMUSG00000000004 117
ENSMUSG00000000004 87
ENSMUSG00000000004 2323

想要转化成的文件如下所示：
ENSMUSG00000000001 0 190
ENSMUSG00000000001 191 343
ENSMUSG00000000002 0 129
ENSMUSG00000000003 0 128
ENSMUSG00000000003 129 285
ENSMUSG00000000003 286 426
ENSMUSG00000000004 0 42
ENSMUSG00000000004 43 159
ENSMUSG00000000004 160 246
ENSMUSG00000000004 247 2569
即A文件的第二列可以看成一个长度，在B文件中给出数值区间，如第一行，190可以转化为0 190， 第二行在190的基础上加上153，就是343，这时候的起始数字为190+1，则这行为ENSMUSG00000000001 191 343，在计算的时候，根据第一列的不同，要分开来算，如到了ENSMUSG00000000002，这里的129又重新定义为0 129.
请问如何实现，谢谢大家！

sweettania

awk '{if(!($1 in a)){a[$1]=$2;print $1,0,$2}else{print $1,a[$1]+1,a[$1]+$2;a[$1]+=$2}}' A

yestreenstars

1. awk '!a[$1]++{$3=$2;$2=0}$1==p{$3=q+$2;$2=q+1}{p=$1;q=$3}1'

复制代码

li0924

看看这个怎么样？

1. awk '{s=a[$1]++?e+1:0;e=b[$1]++?e+$2:$2;print $1,s,e}' file

复制代码

seesea2517

1. [seesea@UC  ~]$ awk '{print $1, $1 in ar ? ar[$1]+1 : 0, ar[$1]+$2; ar[$1]+=$2}' A      
   
2. ENSMUSG00000000001 0 190
   
3. ENSMUSG00000000001 191 343
   
4. ENSMUSG00000000002 0 129
   
5. ENSMUSG00000000003 0 128
   
6. ENSMUSG00000000003 129 285
   
7. ENSMUSG00000000003 286 426
   
8. ENSMUSG00000000004 0 42
   
9. ENSMUSG00000000004 43 159
   
10. ENSMUSG00000000004 160 246
    
11. ENSMUSG00000000004 247 2569

复制代码

seesea2517

这样就可以了，原来如此啊：

1. [seesea@UC  ~]$ awk '{print $1, $1 in ar ? ar[$1]+1 : 0, ar[$1]+=$2}' A
   
2. ENSMUSG00000000001 0 190
   
3. ENSMUSG00000000001 191 343
   
4. ENSMUSG00000000002 0 129
   
5. ENSMUSG00000000003 0 128
   
6. ENSMUSG00000000003 129 285
   
7. ENSMUSG00000000003 286 426
   
8. ENSMUSG00000000004 0 42
   
9. ENSMUSG00000000004 43 159
   
10. ENSMUSG00000000004 160 246
    
11. ENSMUSG00000000004 247 2569

复制代码

reyleon

1. awk 'a!=$1{print $1,0,$2;b=0}a==$1{print $1,b+1,b+$2}{a=$1;b+=$2}' file

复制代码

Herowinter

1. awk '!a[$1]{a[$1]=$2;print $1" "0" "$2;next} a[$1]{s=a[$1]+1;a[$1]+=$2;print $1" "s" "a[$1]}' i

复制代码