[chronojump] T0 in photocells rounded

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

commit 49116f2ef7d2d3bfcfb20dc958ef0beb738c7c46
Author: Xavier Padullés <x padulles gmail com>
Date:   Wed Feb 3 17:13:34 2021 +0100

    T0 in photocells rounded

 r-scripts/sprintPhotocells.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
---
diff --git a/r-scripts/sprintPhotocells.R b/r-scripts/sprintPhotocells.R
index c78be9c4..29610526 100644
--- a/r-scripts/sprintPhotocells.R
+++ b/r-scripts/sprintPhotocells.R
@@ -201,7 +201,7 @@ drawSprintFromPhotocells <- function(sprintDynamics, splitTimes, positions, titl
                 xlab="Time[s]", ylab="Velocity[m/s]",
                 axes = FALSE, yaxs= "i", xaxs = "i")
         text(textXPos, avg.speeds, round(avg.speeds, digits = 2), pos = 3)
-        axis(3, at = c(-sprintDynamics$T0,splitTimes), labels = c(-sprintDynamics$T0,splitTimes))
+        axis(3, at = c(-sprintDynamics$T0,splitTimes), labels = c(round(-sprintDynamics$T0, digits = 
3),splitTimes))
         
         # Fitted speed plotting
         par(new=T)