R/shiny.R

Defines functions create_game_description

#'@export
create_game_description <- function(Tm, at, Opp){

    case_when(
        at == "Home" ~ str_c(Opp, " @ ", Tm),
        TRUE ~ str_c(Tm, " @ ", Opp)
    )



}
nickpaul7/npmlb documentation built on Nov. 4, 2019, 10:04 p.m.