[fix]get_pass_Allplayer

R/make_data.R

@@ -92,8 +92,8 @@ get_kick <- function(action) {
 }
 
 get_action_Allplayer <- function(players,action){
-    players <- players  %>% 
-        dplyr::select(-c("px","py"))
+    action <- action  %>% 
+        dplyr::select(c("step","ball_x","ball_y","pass_scc"))
     output <- players  %>% 
         dplyr::inner_join(action,by = "step")
     return(output)