
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
e
faz 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$1
obter 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
printf
preenche 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 paracolumn -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 sed
a 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 emperl:
perl -lane 'print $F[0], "\t", "=" x ($F[1] / 5)' file
EXPLICAÇÕES:
-a
é um array explícitosplit()
,@F
obtemos 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 *.......................................
.
.
.