download all of tidymodels into a folder

download-tidymodels.R

library(gh)

dir <- "~/Desktop/all-of-tidymodels"
fs::dir_create(dir)

repos <- gh(
  "GET /users/{username}/repos", 
  username = "tidymodels", 
  .per_page = 100
)

repos <- vapply(repos, "[[", "", "name")

excludes <- c(
  ".github",
  "aml-training",
  "cloudstart",
  "model-implementation-principles",
  "planning",
  "tidymodels.org",
  "tidymodels.org-legacy",
  "TMwR",
  "vetiver-redirect",
  "workshops"
)

repos <- setdiff(repos, excludes)

paste0("tidymodels/", repos) |>
  purrr::walk(usethis::create_from_github, destdir = dir, open = FALSE)