 |
tAdd plot script - bitreich-memestats - statistical analysis of tags in Freenod… |
 |
git clone git://src.adamsgaard.dk/bitreich-memestats |
 |
Log |
|
Files |
|
Refs |
|
--- |
|
commit e3aca3409bdee91be0505096223c25b318e030ee |
|
parent fc2311b33218ea7cd9d7d084d33685fbfa3ea85b |
|
Author: Anders Damsgaard <[email protected]> |
|
Date: Mon, 20 Apr 2020 09:02:00 +0200 |
|
|
|
Add plot script |
|
|
|
Diffstat: |
|
A plot-memecount.sh | 49 +++++++++++++++++++++++++++++… |
|
|
|
1 file changed, 49 insertions(+), 0 deletions(-) |
|
--- |
|
diff --git a/plot-memecount.sh b/plot-memecount.sh |
|
t@@ -0,0 +1,49 @@ |
|
+#!/bin/sh |
|
+ |
|
+annnadir="$HOME/code/annna" |
|
+memefile="modules/hashtags/hashtags.txt" |
|
+statfile="$(mktemp)" |
|
+update_annna=yes |
|
+ |
|
+die() { |
|
+ printf 'error: %s\n' "$1" >&2 |
|
+ exit 1 |
|
+} |
|
+ |
|
+if [ ! -e "${annnadir}/${memefile}" ]; then |
|
+ die "could not open '${annnadir}/${memefile}'" |
|
+fi |
|
+cd "$annnadir" |
|
+if [ "$update_annna" = "yes" ]; then |
|
+ git pull >/dev/null 2>&1 |
|
+fi |
|
+ |
|
+# derived from Hiltjo Posthuma's loc.sh |
|
+git log --pretty='format:%H %cd' --date="format:%Y-%m-%d" | \ |
|
+ sort -k 2 | uniq -f 1 | \ |
|
+ while read -r commit date; do |
|
+ |
|
+ # hashtags originally stored in annna-start-services... |
|
+ n="$(git show "$commit:annna-start-services" 2>/dev/null | \ |
|
+ grep -E '^ #[a-z0-9]' | wc -l)" |
|
+ |
|
+ # ...but are now stored in $memefile |
|
+ if [ "$n" -eq 0 ]; then |
|
+ n="$(git show "$commit:$memefile" 2>/dev/null | wc -l)" |
|
+ fi |
|
+ |
|
+ if [ "$n" -gt 1 ]; then |
|
+ printf '%s\t%s\t%s\n' "$date" "$commit" "$n" |
|
+ fi |
|
+done > "$statfile" |
|
+ |
|
+gnuplot - <<__EOF__ |
|
+set term dumb |
|
+set title "annna meme count (total on $(date +%Y-%m-%d): \ |
|
+$(tail -1 "$statfile" | awk '{print $3}'))" |
|
+set xdata time |
|
+set format x "%Y-%m" |
|
+set timefmt "%Y-%m-%dT%H:%M:%S" |
|
+set xtics 2592000*4 |
|
+plot '$statfile' u 1:3 w lp t '' pt 13 |
|
+__EOF__ |
