[chronojump] Encoder: Added "g" to analyze single, side



commit d490f3c31bd58bfdfa02825e916d7df8462c76f8
Author: Xavier de Blas <xaviblas gmail com>
Date:   Mon Nov 18 08:49:40 2013 +0100

    Encoder: Added "g" to analyze single, side

 encoder/graph.R |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index b9a1760..091e013 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -918,9 +918,10 @@ paint <- function(rawdata, eccon, xmin, xmax, yrange, knRanges, superpose, highl
                        
                if(isPropulsive) {
                        #propulsive stuff
-                       abline(h=-g,lty=3,col="magenta")
+                       segments(0,-9.81,length(accel$y),-9.81,lty=3,col="magenta")
                        abline(v=propulsiveEnd,lty=3,col="magenta") 
                        points(propulsiveEnd, -g, col="magenta")
+                       text(x=length(accel$y),y=-9.81,labels=" g",cex=1,adj=c(0,0),col="magenta")
                }
                
                if(showAxes & showAccel) {


[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]