More data

[mirrors/Programs.git] / c / goertzel / sleepplot.sh

diff --git a/c/goertzel/sleepplot.sh b/c/goertzel/sleepplot.sh
index 496690e1c06bd05a77a65ab3df2f662c6bc0833a..00d275a62fccdebeb5ed75c50b8d087a15966208 100755 (executable)
--- a/c/goertzel/sleepplot.sh
+++ b/c/goertzel/sleepplot.sh
@@ -5,24 +5,19 @@ 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"
-
+in="$1";
+graphout="${in%%.*}.png"
+test -n "$2" && graphout="$2";
 
 #Approximate size of graph
-size="$(tail -n 1 "$1" | cut -d . -f 1)"
+size="$(tail -n 1 "$in" | 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,300
+set output "$graphout"
+set terminal png size $size,400
 
 set title "Sleep motions"
 set xlabel "time"
@@ -37,7 +32,13 @@ set timefmt "%s"
 set grid
 
 #set pointsize 0.5
-plot "$1" using 2:5 with steps, "$1.counts" using 2:(\$1/7) with lines
+plot\
+"$in" using 2:5 title "Sensor state" with steps,\
+"" using 2:(\$6*2) title "Avg. 10s" with lines,\
+"" using 2:(\$7*3) title "Avg. 30s" with lines,\
+"" using 2:(\$8*3) title "Avg. 60s" with lines,\
+"" using 2:(\$9*3) title "Avg. 90s" with lines,\
+"" using 2:(\$10*4) title "Avg. 120s" smooth bezier\
 
 EOF