data-raw/matches.R

## code to prepare `matches` dataset goes here

devtools::load_all()
source("data-raw/scraping_matches.R")

matches_2024 <- purrr::map_dfr(1:38, scraper_ge_2024)

new_id <- max(matches$id_match) + 1

matches_2024 <- matches_2024 |>
  dplyr::mutate(id_match = new_id:(new_id + dplyr::n() - 1))

matches <- matches |>
  dplyr::bind_rows(matches_2024)

usethis::use_data(matches, overwrite = TRUE)
williamorim/brasileirao documentation built on Sept. 28, 2024, 8:36 a.m.