#'@title Get the available play type values
#'
#'@description Get the available play type values
#'
#'@examples
#'
#'@export
get_play_types <- function(){
rawPlayTypes <- get_CFB_json_from_url('play/types')
playTypes <- data.frame(PlayTypeId = rawPlayTypes$id,
PlayTypeName = rawPlayTypes$text,
PlayTypeAbbr = rawPlayTypes$abbreviation,
stringsAsFactors = FALSE)
return(playTypes)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.