[chronojump] Fixed units in RaceAnalyzer raw accel

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

commit 9c76ca40e36a981336230cbc0fa913fd342dc908
Author: Xavier Padullés <x padulles gmail com>
Date:   Wed Feb 3 17:15:48 2021 +0100

    Fixed units in RaceAnalyzer raw accel

 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 d064bc4a..a7e13f4e 100644
--- a/r-scripts/sprintEncoder.R
+++ b/r-scripts/sprintEncoder.R
@@ -436,7 +436,7 @@ plotSprintFromEncoder <- function(sprintRawDynamics, sprintFittedDynamics,
                              
                         axis(side = 4)
                         #abline(h=c(0,sprintRawDynamics$startAccel), col = c("magenta", "magenta"), lty = 
c(1,2))
-                        legendText = c(legendText, paste("A max (raw) =", round(sprintRawDynamics$rawAmax, 
digits = 2), "m/s"))
+                        legendText = c(legendText, paste("A max (raw) =", round(sprintRawDynamics$rawAmax, 
digits = 2), "m/s\u00b2"))
                         legendColor = c(legendColor, "magenta")
                        legendLty = c(legendLty, ltyRaw)
                        legendLwd = c(legendLwd, lwdRaw)