diff --git a/R/make_data.R b/R/make_data.R index a51cd9d3683a5a391555d81b0cdd10370fa8d97c..d03ba8efb754ac0c19cb4f02a65d3fbd4fa14f2a 100644 --- a/R/make_data.R +++ b/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)