[chronojump] RaceAnalyzer. Fixed Vmax.raw

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

commit 721f575375dc2d98ac1db194a59786ab0e624472
Author: Xavier Padullés <x padulles gmail com>
Date:   Fri May 10 13:11:12 2019 +0200

    RaceAnalyzer. Fixed Vmax.raw

 r-scripts/sprintEncoder.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
---
diff --git a/r-scripts/sprintEncoder.R b/r-scripts/sprintEncoder.R
index de6915f2..d7957612 100644
--- a/r-scripts/sprintEncoder.R
+++ b/r-scripts/sprintEncoder.R
@@ -276,7 +276,7 @@ plotSprintFromEncoder <- function(sprintRawDynamics, sprintFittedDynamics, title
         mtext(side = 3, at = splitTime, text = paste(splitPosition, "m", sep=""))
         mtext(side = 1, at = splitTime, text = paste(round(splitTime, digits = 3), "s", sep=""))
         
-        legendText = paste("Vmax.raw =", round(max(sprintRawDynamics$rawSpeed), digits = 2), "m/s")
+        legendText = paste("Vmax.raw =", round(sprintRawDynamics$rawVmax, digits = 2), "m/s")
         legendColor = "black"
 
         if (plotFittedSpeed)