Skip to contents

CFB Data Plays Examples

Saiem Gilani, Akshay Easwaran, Jared Lee
@saiemgilani @saiemgilani @akeaswaran @akeaswaran

Source: vignettes/cfbd_plays.Rmd
cfbd_plays.Rmd

Load and Install Packages 

if (!requireNamespace('pak', quietly = TRUE)){
  install.packages('pak')
}
pak::pak(c("dplyr", "tidyr", "cfbfastR"))
library(dplyr)
library(tidyr)
library(cfbfastR)
#pak::pak("sportsdataverse/cfbfastR")

Pull first 3 weeks of 2020 season using cfbd_plays() 

year_vector <- 2020
week_vector <- 1:3
weekly_year_df <- expand.grid(year = year_vector, week = week_vector)

tictoc::tic()
year_split <- split(weekly_year_df, weekly_year_df$year)
for (i in 1:length(year_split)) {
  progressr::with_progress({
    year_split[[i]] <- year_split[[i]] |>
      dplyr::mutate(
        pbp = purrr::map2(
          .x = year,
          .y = week,
          cfbd_plays,
          season_type = "both"
        )
      )

    Sys.sleep(1)
  })
}

tictoc::toc()

year_split <- lapply(year_split, function(x) {
  x |> tidyr::unnest(pbp, names_repair = "minimal")
})

all_years <- dplyr::bind_rows(year_split)
glimpse(all_years)

Our Authors

Our Contributors

Citation

To cite the cfbfastR R package in publications, use:

BibTeX Citation

@misc{cfbfastr,
  author = {Saiem Gilani and Akshay Easwaran and Jared Lee and Eric Hess},
  title = {cfbfastR: Access College Football Play by Play Data},
  url = {https://cfbfastR.sportsdataverse.org/},
  year = {2021}
}