UNIX for Dummies Questions & Answers

A|C|C|D
A|C|I|E
A|B|I|C
A|T|I|B

1|A=4
2|C=2|B=1|T=1
3|I=3|C=1
4|D=1|E=1|C=1|B=1

awk ' BEGIN {FS="|"}{for(i=1; i<=NF; i++){group[$i]++}} END{for(c in group) {print c " = " group[c]}}'

awk 'BEGIN{FS = "|"; OFS = "|"}
  {for(i = 1; i <= NF; i++) {a[i " " $i]++}}
  END {for(x in a) {print x "=" a[x]}}' <INPUT_FILE> | awk '{if(a[$1] == "") {a[$1] = $1 "|" $2} else {a[$1] = (a[$1] "|" $2)}; if(max < $1) {max = $1}}
    END {for(i = 1; i <= max; i++) {print a[i]}}'

awk -F "|" '
{       for(i = 1; i <= NF; i++) {a[i " " $i]++} }
END {   for(x in a) print x " " a[x] }' input_file | 
sort -k3,3rn -k2,2 |
awk '
{       a[$1] = (a[$1] == "" ? $1 : a[$1]) "|" $2 "=" $3
        if(max < $1) max = $1
}
END {   for(i = 1; i <= max; i++) print a[i] }'

1|A=4
2|C=2|B=1|T=1
3|I=3|C=1
4|B=1|C=1|D=1|E=1

 awk '{for(i=1;i<=NF;i++){a[i]=a[i]?a[i]"|"$i:$i}}
 END{for(i=1;i<=length(a);i++){split(a[i],b);printf i;for(m in b){c[b[m]]++}for(n in c){printf "|"n"="c[n]}printf "\n";delete c}}' FS='|'   infile