From: Tomas Mudrunka <tomas@mudrunka.cz>
Date: Thu, 2 Aug 2012 22:24:46 +0000 (+0200)
Subject: Experimental event counting algo
X-Git-Url: https://git.harvie.cz/?a=commitdiff_plain;h=6c5737553eba6afbdba017ca776cf8788c85577f;p=mirrors%2FPrograms.git

Experimental event counting algo
---

diff --git a/c/goertzel/sleepplot.sh b/c/goertzel/sleepplot.sh
index cd4452e..496690e 100755
--- a/c/goertzel/sleepplot.sh
+++ b/c/goertzel/sleepplot.sh
@@ -5,19 +5,30 @@ test -z "$1" && {
 	exit 23
 }
 
+#Count:
+seconds=60
+cat "$1" | cut -f 2,5 | cut -d ' ' -f 1 | grep '1$' | while read line; do
+	time=$(echo $line | cut -d ' ' -f 1);
+	time=$(( $time + $seconds - $time%$seconds ))
+	echo "$time"
+done | uniq -c | sed -e 's/^\s*//g' | tr ' ' '\t' > "$1.counts"
+
+
+#Approximate size of graph
 size="$(tail -n 1 "$1" | cut -d . -f 1)"
 test $size -gt 3600 && size="$(( $size/10 ))" #For prolonged periods
 size="$(( 600 + $size ))"
 
+#Plot it
 gnuplot << EOF
 set output "$1.png"
-set terminal png size $size,200
+set terminal png size $size,300
 
 set title "Sleep motions"
 set xlabel "time"
 set ylabel "motion"
 
-set yrange [-0.5:1.5]
+set yrange [-0.5:3]
 
 set xdata time
 set timefmt "%s"
@@ -26,7 +37,7 @@ set timefmt "%s"
 set grid
 
 #set pointsize 0.5
-plot "$1" using 2:5 with steps
+plot "$1" using 2:5 with steps, "$1.counts" using 2:(\$1/7) with lines
 
 EOF