parse.special <- function(play) {
play$kicker <- NA
play$made <- NA
play$returner <- NA
play$kick_dist <- NA
play$touchback <- FALSE
play$kick_return <- NA
play <- parse.kickoff(play)
play <- parse.punt(play)
play <- parse.pat(play)
play <- parse.fg(play)
return(play)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.