[chronojump] minor fix

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

commit 84a806e009dafe657fdfed993936116bfe7828df
Author: Xavier Padullés <x padulles gmail com>
Date:   Fri Mar 31 12:31:55 2017 +0200

    minor fix

 r-scripts/sprintPhotocells.R |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/r-scripts/sprintPhotocells.R b/r-scripts/sprintPhotocells.R
index 953c6a7..f1753d5 100644
--- a/r-scripts/sprintPhotocells.R
+++ b/r-scripts/sprintPhotocells.R
@@ -60,7 +60,7 @@ getSprintFromPhotocell <- function(positions, splitTimes, noise=0)
         #if there's only three positions. Substituting x1 = x(t1), and x2 = x(t2) whe have an exact solution.
         #2 variables (K and Vmax) and 2 equations.
         if (length(positions == 3)){
-                return(getSprintFrom2SplitTimes(x1 = positions[2], x2 = position[3], t1 = splitTimes[2], t2 
= splitTimes[3] ))
+                return(getSprintFrom2SplitTimes(x1 = positions[2], x2 = positions[3], t1 = splitTimes[2], t2 
= splitTimes[3] ))
         }
         
         photocell = data.frame(time = splitTimes, position = positions)