R/get_id.R

In bayesball/CalledStrike: Functions for Graphing Statcast Data

Defines functions get_id

Documented in get_id

get_id <- function(name){
  names <- unlist(strsplit(name, " "))
  playerid_lookup(last_name = names[2],
                  first_name = names[1]) %>%
    dplyr::select(mlbam_id) %>% top_n(-1) %>% pull()
}