R/usfl_teams.R

Defines functions usfl_load_teams

Documented in usfl_load_teams

#' Load USFL Teams File from Anthony Reinhard's Github
#'
#' @return A dataframe
#' @export
#'
#' @examples
#' usfl_load_teams()
usfl_load_teams <- function(){
  nflreadr::csv_from_url("https://github.com/ajreinhard/USFL/raw/main/data/teams.csv", header = TRUE) |>
    janitor::remove_empty("cols") |>
    tibble::as_tibble()
}
mrcaseb/rusfl documentation built on April 29, 2022, 7:20 p.m.