Parralel integration
[mirrors/Programs.git] / c / goertzel / sleepplot.sh
index 496690e1c06bd05a77a65ab3df2f662c6bc0833a..a47f7e2f92be1efe07f7d135bf38656b29933782 100755 (executable)
@@ -5,26 +5,25 @@ 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";
 
+#Last state
+last="$(tail -n 1 "$in" | cut -d ' ' -f 5)"
+test "$last" -gt 0 && last="motion" || last="peace";
 
 #Approximate size of graph
-size="$(tail -n 1 "$1" | cut -d . -f 1)"
+size="$(tail -n 1 "$in" | cut -d . -f 1 | sed -e 's/^0*//' | tee /tmp/lol)"
 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 title "Sleep motions (current state: $last)"
 set xlabel "time"
 set ylabel "motion"
 
@@ -37,7 +36,17 @@ 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,\
+"$in.stats" using 1:((\$3*3+\$4*6+\$5*6+\$6+\$7)/5) title "Avg." smooth bezier\
+#"" using 2:((\$6*3+\$7*6+\$8*6+\$9+\$10)/5) title "Avg." with lines,\
+#"$in.stats" using 1:((\$3*3+\$4*6+\$5*6+\$6+\$7)/5) title "Avg." with lines,\
+#"" 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
 
This page took 0.101172 seconds and 4 git commands to generate.