|
|
plot-memecount.sh - bitreich-memestats - Bitreich meme statistics and graphs. |
|
|
 |
git clone git://bitreich.org/bitreich-memestats git://hg6vgqziawt5s4dj.onion/bitreich-memestats (git://bitreich.org) |
|
|
 |
Log |
|
|
|
Files |
|
|
|
Refs |
|
|
|
Tags |
|
|
|
LICENSE |
|
|
|
--- |
|
|
|
plot-memecount.sh (607B) |
|
|
|
--- |
|
|
|
1 #!/bin/sh |
|
|
|
2 # output ascii plot of hashtag evolution generated with extract-memecount.sh |
|
|
|
3 |
|
|
|
4 if [ $# -lt 1 ]; then |
|
|
|
5 printf 'usage: %s <file>\n' "$0" >&2 |
|
|
|
6 exit 1 |
|
|
|
7 fi |
|
|
|
8 |
|
|
|
9 [ "$2" = "semilog" ] && semilog="set log y" |
|
|
|
10 |
|
|
|
11 gnuplot - <<__EOF__ |
|
|
|
12 set term dumb |
|
|
|
13 set title "annna meme count (total on $(date +%Y-%m-%d): \ |
|
|
|
14 $(awk 'END{print $3+$6+$7}' "$1")) $semilog" |
|
|
|
15 set xdata time |
|
|
|
16 set format x "%Y-%m" |
|
|
|
17 set timefmt "%Y-%m-%d" |
|
|
|
18 set xtics 3600*24*365 |
|
|
|
19 set key top left |
|
|
|
20 $semilog |
|
|
|
21 plot '$1' u 1:(\$3+\$6+\$7) w lp t 'total' pt 20,\ |
|
|
|
22 '' u 1:3 w lp t 'memes' pt 13,\ |
|
|
|
23 '' u 1:6 w lp t 'emojis' pt 5,\ |
|
|
|
24 '' u 1:7 w lp t 'filters' pt 6 |
|
|
|
25 __EOF__ |
|