collect_player <- function(player, Season = 2018,
Batter = TRUE){
id <- get_id(player)
get_sc_data(id, season = Season, batter = Batter)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.