#' Get max stake
#' @param data tibble obtained from `read_and_prep_data`
#'
get_max_stake <- function(data) {
data %>%
dplyr::pull(Stake) %>%
max() %>%
ceiling()
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.