[chronojump/FS-RFD-ManualTrimming: 12/15] Eliminated restriction of sustained force in graph

[Xavier Padullés <xpadulles src gnome org>]

commit 2845c2b4a365adc2e254dbc3d73aa950e8e831b6
Author: Xavier Padullés <testing chronojump org>
Date:   Sat Nov 21 15:23:55 2020 +0100

    Eliminated restriction of sustained force in graph

 r-scripts/maximumIsometricForce.R | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)
---
diff --git a/r-scripts/maximumIsometricForce.R b/r-scripts/maximumIsometricForce.R
index a8bc9bb7..218949f1 100644
--- a/r-scripts/maximumIsometricForce.R
+++ b/r-scripts/maximumIsometricForce.R
@@ -270,13 +270,13 @@ drawDynamicsFromLoadCell <- function(
     }
     
     
-    if(!sustainedForce){
-        text(x = (xmax + xmin)/2, y = yHeight/2, labels = "Bad execution. Probably not sustained force", adj 
= c(0.5, 0.5), cex = 2, col = "red")
-        #Plotting not analysed data
-        lines(dynamics$time[1:dynamics$startSample] , dynamics$f.raw[1:dynamics$startSample], col = "grey") 
#Pre-analysis
-        lines(dynamics$time[dynamics$endSample: dynamics$totalSample] , dynamics$f.raw[dynamics$endSample: 
dynamics$totalSample], col = "grey") #Post-analysis
-        return()
-    }
+    # if(!sustainedForce){
+    #     text(x = (xmax + xmin)/2, y = yHeight/2, labels = "Bad execution. Probably not sustained force", 
adj = c(0.5, 0.5), cex = 2, col = "red")
+    #     #Plotting not analysed data
+    #     lines(dynamics$time[1:dynamics$startSample] , dynamics$f.raw[1:dynamics$startSample], col = 
"grey") #Pre-analysis
+    #     lines(dynamics$time[dynamics$endSample: dynamics$totalSample] , dynamics$f.raw[dynamics$endSample: 
dynamics$totalSample], col = "grey") #Post-analysis
+    #     return()
+    # }
     
     #Plotting Impulse