Shell Programming and Scripting

BEGIN{
 count=0
 a[1,8] = 0
}

/AAA/{
        getline
        for(i=1; i<=8; i++)
                a[i] += $i
        count++
}

END{
        for(i=1; i<=8; i++)
                b[i] = a[i]/count
        print b[1], b[2], b[3], b[4], b[5], b[6], b[7], b[8]
}

awk -f avg.awk input_file

awk '/^[0-9]/{for(i=0;++i<=NF;) a[i]=a[i]?(a[i]+$i):$i;c++}END{for(i=0;++i<=NF;) printf ("%s%s",(i==1)?"":FS,a[i]/c)}'  file

awk '!(NR%2){a="";for(i=1;i<=NF;i++){t[i]+=$i; a=a FS t[i]/(NR/2)}}END{print substr(a,2)}' file

awk '/^[0-9]/{for(i=0;++i<=NF;) a[i]=a[i]?(a[i]+$i):$i;c++;max=(max>NF)?max:NF}END{for(i=0;++i<=max;) printf ("%s%s",(i==1)?"":FS,a[i]/c)}' file

sed '/^>/d' a.txt | awk '{
        for(i=1;i<=NF;i++)
        _[i]+=$i
        num=NR
        }
        END{
        for(i in _)
        printf("%s ",_[i]/NR)
        }'