[chronojump] Minor changes

[Xavier de Blas <xaviblas src gnome org>]

commit 5feb285a7263c1a80d446c2a1d32d6f8e6260067
Author: Xavier de Blas <xaviblas gmail com>
Date:   Tue May 19 16:06:33 2015 +0200

    Minor changes

 encoder/graph.R |    9 +++------
 1 files changed, 3 insertions(+), 6 deletions(-)
---
diff --git a/encoder/graph.R b/encoder/graph.R
index 9f30916..fd3218c 100644
--- a/encoder/graph.R
+++ b/encoder/graph.R
@@ -1114,7 +1114,7 @@ paint <- function(displacement, eccon, xmin, xmax, yrange, knRanges, superpose,
                else {
                        #1 get force only in concentric phase
                        forceConcentric = force[concentric]
-                       print(c("forceConcentric",forceConcentric))
+                       #print(c("forceConcentric",forceConcentric))
 
                        #2 get takeoff using maxSpeedT but relative to concentric, not all the ecc-con
                        
@@ -1673,8 +1673,8 @@ paintCrossVariables <- function (paf, varX, varY, option, isAlone, title, single
        if(varX == "Inertia")
                x = x * 10000
 
-       print("seriesName")
-       print(seriesName)
+       #print("seriesName")
+       #print(seriesName)
 
        colBalls = NULL
        bgBalls = NULL
@@ -2417,9 +2417,6 @@ doProcess <- function(options)
                SmoothingsEC = findSmoothingsEC(singleFile, displacement, curves, op$Eccon, op$SmoothingOneC)
                print(c("SmoothingsEC:",SmoothingsEC))
                
-               print("curves after findSmoothingsEC")
-               print(curves)
-
                if(curvesPlot) {
                        #/10 mm -> cm
                        for(i in 1:length(curves[,1])) {