パスの成否の判定条件を変更

R/make_data.R

@@ -146,7 +146,7 @@ get_kick_log <- function(action,goal) {
         dplyr::mutate(dribble_scc = (
             (judge == "NULL") & (next_judge == "NULL") & a_sameteam & a_sameunum)) %>%
         dplyr::mutate(pass_scc = (
-            (judge == "NULL") & (next_judge == "NULL") & a_sameteam & !a_sameunum)) %>%
+            a_sameteam & !a_sameunum)) %>%
         dplyr::mutate(shoot = (
             shoot_scc |
             abs(target_ball_x) > (soccer_field_length/2) & abs(target_ball_y) < 12)) %>%