Merge branch 'master' of https://github.com/mdewey131/Snappa-Scoreboard

Snappametrics · Oct 29, 2020 · 7dc38e9 · 7dc38e9
2 parents 9e9c550 + 2297b86
commit 7dc38e9
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/app.R b/app.R
@@ -1847,7 +1847,7 @@ observeEvent(input$resume_no, {
       group_by(game_id) %>% 
       summarise(points_a = sum((team == "A")*total_points),
                 points_b = sum((team == "B")*total_points),
-                rounds = as.integer(vals$shot_num-1),
+                rounds = as.integer(vals$shot_num),
                 ones = sum(ones),
                 twos = sum(twos),
                 threes = sum(threes),
@@ -1860,7 +1860,7 @@ observeEvent(input$resume_no, {
         group_by(game_id) %>% 
         summarise(points_a = sum((team == "A")*total_points),
                   points_b = sum((team == "B")*total_points),
-                  rounds = as.integer(vals$shot_num-1),
+                  rounds = as.integer(vals$shot_num),
                   ones = sum(ones),
                   twos = sum(twos),
                   threes = sum(threes),