怎么提取偶数列和奇数列

gooderpan

有一个文件：（tab分隔）
r1        115466        S        C        ./.     0/0     0/1    ./.     1/1
r1        546608        F        C        ./.     0/1     0/0    1/1    0/1
r2        566085        T        H       0/0    ./.      0/1     ./.     1/1

想从第五列开始间隔提取：
file1：
r1        115466        S        C        ./.     0/1    1/1
r1        546608        F        C        ./.     0/0    0/1
r2        566085        T        H       0/0    0/1     1/1

file2：
r1        115466        S        C        0/0     ./.
r1        546608        F        C        0/1     1/1
r2        566085        T        H        ./.      ./.

请大神们帮帮忙。谢谢啦！

moperyblue

1. 奇:
   
2. awk -F'\t' '{for(i=1;i<=NF;i++){
   
3.     if(i<=4)
   
4.     {
   
5.         printf $i"\t"
   
6.     }
   
7.     else if(i%2)   
   
8.     {
   
9.         printf $i"\t"
   
10.     }
    
11. }
    
12. printf"\n"
    
13. }' file
    
14. 
    
15. 偶:
    
16. awk -F'\t' '{for(i=1;i<=NF;i++){
    
17.     if(i<=4)
    
18.     {
    
19.         printf $i"\t"
    
20.     }
    
21.     else if(i%2==0)   
    
22.     {
    
23.         printf $i"\t"
    
24.     }
    
25. }
    
26. printf"\n"
    
27. }' file

复制代码

haooooaaa

1. awk '{OFS="\t";for(i=5;i<=NF;i++)if(i%2)a=a"\t"$i;else{b=b"\t"$i};NF=4;print $0 a>"a.txt";print $0 b>"b.txt";a=b=c}' file

复制代码

gooderpan

谢谢大神！！回复 2# moperyblue


   

gooderpan

谢谢大神！！回复 3# haooooaaa


   

jcdiy0601

1. awk '{for(i=1;i<=5;i++)printf("%s\t",$i);for(i=7;i<=NF;i+=2)printf("%s\t",$i);print ""}' file
   
2. 
   
3. awk '{for(i=1;i<=4;i++)printf("%s\t",$i);for(i=6;i<=NF;i+=2)printf("%s\t",$i);print ""}' file

复制代码

或者

1. awk '{for(i=6;i<=NF;i+=2)$i=""}{print $0}' file
   
2. 
   
3. awk '{for(i=5;i<=NF;i+=2)$i=""}{print $0}' file

复制代码