[chronojump] Encoder graph instant always show triggers above position polygon



commit eb2b4f3e71deda6558b40859e0a21257c7481124
Author: Xavier de Blas <xaviblas gmail com>
Date:   Fri Nov 8 18:46:16 2019 +0100

    Encoder graph instant always show triggers above position polygon

 encoder/graph.R | 18 ++++++++----------
 1 file changed, 8 insertions(+), 10 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index 122aabd7..6f4a619d 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -607,16 +607,6 @@ paint <- function(displacement, eccon, xmin, xmax, xrange, yrange, knRanges, pai
                                abline(h=0,lty=3,col="black")
                        }
                }
-
-
-               if(triggersOnList != "" && triggersOnList != -1)
-               {
-                       print("triggersOnList-xmin")
-                       print(triggersOnList-xmin)
-                       abline(v=(triggersOnList-xmin), col="yellow3", lwd=2, lty=2)
-                       #mtext(side=3, at=(triggersOnList-xmin), text=(triggersOnList-xmin), cex=.8)
-               }
-                
                 #abline(v=seq(from=0,to=length(position),by=500),lty=3,col="gray")
         }
         
@@ -735,6 +725,14 @@ paint <- function(displacement, eccon, xmin, xmax, xrange, yrange, knRanges, pai
                        col="grey90")
        }
 
+       if(triggersOnList != "" && triggersOnList != -1)
+       {
+               print("triggersOnList-xmin")
+               print(triggersOnList-xmin)
+               abline(v=(triggersOnList-xmin), col="yellow3", lwd=2, lty=2)
+               #mtext(side=3, at=(triggersOnList-xmin), text=(triggersOnList-xmin), cex=.8)
+       }
+
         print(c("propulsiveEnd at paint", propulsiveEnd))
         
         


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