Commit a202ee9e authored by Takumi Amano's avatar Takumi Amano 💬
Browse files

[fix]get_passを修正

parent 5dd0d0ff
...@@ -185,7 +185,7 @@ get_pass <- function(kick) { ...@@ -185,7 +185,7 @@ get_pass <- function(kick) {
output <- kick |> output <- kick |>
dplyr::filter(pass == TRUE) %>% dplyr::filter(pass == TRUE) %>%
distinct(step, .keep_all = TRUE) %>% distinct(step, .keep_all = TRUE) %>%
select(-c(a_tackle_scc, tackle_scc, pass, a_sameteam, a_sameunum, next_team, next_unum)) dplyr::select(step,team,numu,px,py,pvx,pvy,ball_x,ball_y,ball_vx,ball_vy,next_ball_x,next_ball_y,next_ball_vx,next_ball_vy,pass,pass_scc)
return(output) return(output)
} }
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment