Desenhando um histograma a partir de uma saída de comando bash

Desenhando um histograma a partir de uma saída de comando bash

Eu tenho a seguinte saída:

2015/1/7    8
2015/1/8    49
2015/1/9    40
2015/1/10   337
2015/1/11   11
2015/1/12   3
2015/1/13   9
2015/1/14   102
2015/1/15   62
2015/1/16   10
2015/1/17   30
2015/1/18   30
2015/1/19   1
2015/1/20   3
2015/1/21   23
2015/1/22   12
2015/1/24   6
2015/1/25   3
2015/1/27   2
2015/1/28   16
2015/1/29   1
2015/2/1    12
2015/2/2    2
2015/2/3    1
2015/2/4    10
2015/2/5    13
2015/2/6    2
2015/2/9    2
2015/2/10   25
2015/2/11   1
2015/2/12   6
2015/2/13   12
2015/2/14   2
2015/2/16   8
2015/2/17   8
2015/2/20   1
2015/2/23   1
2015/2/27   1
2015/3/2    3
2015/3/3    2

E eu gostaria de desenhar um histograma

2015/1/7  ===
2015/1/8  ===========
2015/1/9  ==========
2015/1/10 ====================================================================
2015/1/11 ===
2015/1/11 =
...

Você sabe se existe um comando bash que me permita fazer isso?

Responder1

Em perl:

perl -pe 's/ (\d+)$/"="x$1/e' file
  • efaz com que a expressão seja avaliada, então eu repito =usando o valor de $1(o número correspondente por (\d+)).
  • Você poderia fazer isso "="x($1\/3)em vez de "="x$1obter linhas mais curtas. (O /escape é porque estamos no meio de um comando de substituição.)

Em bash(inspirado emesta resposta SO):

while read d n 
do 
    printf "%s\t%${n}s\n" "$d" = | tr ' ' '=' 
done < test.txt
  • printfpreenche a segunda string usando espaços para obter uma largura de $n ( %${n}s) e substituo os espaços por =.
  • As colunas são delimitadas usando uma tabulação ( \t), mas você pode torná-las mais bonitas canalizando para column -ts'\t'.
  • Você poderia usar $((n/3))em vez de ${n}para obter linhas mais curtas.

Outra versão:

unset IFS; printf "%s\t%*s\n" $(sed 's/$/ =/' test.txt) | tr ' ' =

A única desvantagem que posso ver é que você precisará canalizar seda saída para algo se quiser diminuir a escala, caso contrário, esta é a opção mais limpa. Se houver uma chance de seu arquivo de entrada conter um de [?*vocês, você deve liderar o comando w/ set -f;.

Responder2

Experimente isso em:

perl -lane 'print $F[0], "\t", "=" x ($F[1] / 5)' file

EXPLICAÇÕES:

  • -aé um array explícito split(), @Fobtemos os valores com$F[n]
  • xé dizer ao Perl para imprimir um caractere N vezes
  • ($F[1] / 5): aqui obtemos o número e o dividimos por 5 para obter uma impressão bonita (aritmética simples)

Responder3

Fácil comawk

awk '{$2=sprintf("%-*s", $2, ""); gsub(" ", "=", $2); printf("%-10s%s\n", $1, $2)}' file

2015/1/7 ========
2015/1/8 =================================================
2015/1/9 ========================================
..
..

Ou com minha linguagem de programação favorita

python3 -c 'import sys
for line in sys.stdin:
  data, width = line.split()
  print("{:<10}{:=<{width}}".format(data, "", width=width))' <file

Responder4

Você poderia fazer algo assim com obarverbo emMoleiro

$ mlr --nidx --repifs --ofs tab bar -f 2 file
2015/1/7    ***.....................................
2015/1/8    *******************.....................
2015/1/9    ****************........................
2015/1/10   ***************************************#
2015/1/11   ****....................................
2015/1/12   *.......................................
.
.
.

informação relacionada