[fix]dribble_ALLの修正、フリーキック待機状態を省く

R/make_data.R

@@ -177,7 +177,8 @@ get_dribble_Allplayer <- function(players, dribble) {
     dribble <- dribble %>%
         dplyr::select(step,dribble_team = team,ball_x,ball_y,ball_vx,ball_vy,next_ball_x,next_ball_y,next_ball_vx,next_ball_vy,dribble,dribble_scc)
     output <- players %>%
-        dplyr::inner_join(dribble, by = "step")
+        dplyr::inner_join(dribble, by = "step") %>%
+        dplyr::distinct(step,team,unum, .keep_all = TRUE)
     return(output)
 }