文件过滤，删去一列数值均为0的列

SheIsTheOne

请教一下各位，如果一个文件有n行，n列，除行名和列名为字母以外，其他均为数字，
求如何对其进行判断，使得删去一列数值均为0的列（这一列中每行都为0），保留剩余的文件。

谢谢各位

1cpuer

回复 1# SheIsTheOne

# [ /home/soio/1bs/awks ] {2018-04-05 09:56:00}
: 1522893360:0;➜  awk '1' 100.ixi
A B C D
a S 0 3
b D 0 4


# [ /home/soio/1bs/awks ] {2018-04-05 09:56:18}
: 1522893378:0;➜  sed 's/\<0\>//' 100.ixi
A B C D
a S  3
b D  4

wh7211

回复 1# SheIsTheOne


<<<awk4.0+

1. cat 1
   
2. x a b c d
   
3. e 1 2 0 3
   
4. f 4 5 0 6
   
5. g 7 8 0 9
   
6. 
   
7. awk '{for(i=1;i<=NF;i++){a[i]=a[i]?a[i]+$i:$i;b[NR][i]=$i}}END{PROCINFO["sorted_in"]="@ind_num_asc";for(i in b){for(j in b[i]){if(j==1||a[j]){printf("%s ",b[i][j])}else{delete b[i][j]}};print ""}}' 1
   
8. x a b d
   
9. e 1 2 3
   
10. f 4 5 6
    
11. g 7 8 9

复制代码