R/get_max_stake.R

Defines functions get_max_stake

Documented in get_max_stake

#' Get max stake
#' @param data tibble obtained from `read_and_prep_data`
#' 
get_max_stake <- function(data) {
  
  data %>% 
    dplyr::pull(Stake) %>% 
    max() %>% 
    ceiling()
  
}
kristian-bak/betting documentation built on Oct. 24, 2022, 1:35 p.m.