Running ‘testthat.R’ [6s/38s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(tidytuesdayR)
  > 
  > test_check("tidytuesdayR")
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-07-tt_read_data.R:63:3): tt_read_data can load RDS files just as easily as text files ──
  Error in `github_blob(file.path("data", tt_year, tt_date, x), as_raw = TRUE, 
      sha = sha, auth = auth)`: Response Code 502: Server Error
  Backtrace:
      █
   1. ├─testthat::expect_is(...) test-07-tt_read_data.R:63:2
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─tidytuesdayR::tt_download_file(tt_gh_data, 1)
   5.   ├─base::suppressMessages(...)
   6.   │ └─base::withCallingHandlers(...)
   7.   └─tidytuesdayR:::tt_download_file.numeric(tt, x, ...)
   8.     └─tidytuesdayR:::tt_download_file.character(tt, files[x], ...)
   9.       └─tidytuesdayR:::github_blob(...)
  ── Error (test-07-tt_read_data.R:73:3): read_rda will not arbitrarily assign the object to the current environment ──
  Error in `if (TT_GITHUB_ENV$RATE_REMAINING == 0 & !quiet) {
      if (!getOption("tidytuesdayR.tt_testing", FALSE)) {
          rate_limit_update()
      }
      if (TT_GITHUB_ENV$RATE_REMAINING == 0) {
          message("Github API Rate Limit hit. You must wait until ", 
              format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), 
              " to make calls again!")
      }
  } else if (TT_GITHUB_ENV$RATE_REMAINING <= n & !quiet) {
      message(paste0("Only ", TT_GITHUB_ENV$RATE_REMAINING, " Github queries remaining until ", 
          format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), "."))
  }`: argument is of length zero
  Backtrace:
      █
   1. └─tidytuesdayR:::check_api() test-07-tt_read_data.R:73:2
   2.   └─tidytuesdayR::rate_limit_check(quiet = TRUE) helper-tt_ref_test_that.R:17:2
  ── Error (test-08-tt_load.R:11:3): tt_load loads all data available ────────────
  Error in `if (TT_GITHUB_ENV$RATE_REMAINING == 0 & !quiet) {
      if (!getOption("tidytuesdayR.tt_testing", FALSE)) {
          rate_limit_update()
      }
      if (TT_GITHUB_ENV$RATE_REMAINING == 0) {
          message("Github API Rate Limit hit. You must wait until ", 
              format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), 
              " to make calls again!")
      }
  } else if (TT_GITHUB_ENV$RATE_REMAINING <= n & !quiet) {
      message(paste0("Only ", TT_GITHUB_ENV$RATE_REMAINING, " Github queries remaining until ", 
          format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), "."))
  }`: argument is of length zero
  Backtrace:
      █
   1. └─tidytuesdayR:::check_api() test-08-tt_load.R:11:2
   2.   └─tidytuesdayR::rate_limit_check(quiet = TRUE) helper-tt_ref_test_that.R:17:2
  ── Error (test-08-tt_load.R:36:3): tt_load loads excel files properly ──────────
  Error in `if (TT_GITHUB_ENV$RATE_REMAINING == 0 & !quiet) {
      if (!getOption("tidytuesdayR.tt_testing", FALSE)) {
          rate_limit_update()
      }
      if (TT_GITHUB_ENV$RATE_REMAINING == 0) {
          message("Github API Rate Limit hit. You must wait until ", 
              format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), 
              " to make calls again!")
      }
  } else if (TT_GITHUB_ENV$RATE_REMAINING <= n & !quiet) {
      message(paste0("Only ", TT_GITHUB_ENV$RATE_REMAINING, " Github queries remaining until ", 
          format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), "."))
  }`: argument is of length zero
  Backtrace:
      █
   1. └─tidytuesdayR:::check_api() test-08-tt_load.R:36:2
   2.   └─tidytuesdayR::rate_limit_check(quiet = TRUE) helper-tt_ref_test_that.R:17:2
  ── Error (test-10-utils.R:42:3): print.tt lists all the available files for the weeks tt ──
  Error in `if (TT_GITHUB_ENV$RATE_REMAINING == 0 & !quiet) {
      if (!getOption("tidytuesdayR.tt_testing", FALSE)) {
          rate_limit_update()
      }
      if (TT_GITHUB_ENV$RATE_REMAINING == 0) {
          message("Github API Rate Limit hit. You must wait until ", 
              format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), 
              " to make calls again!")
      }
  } else if (TT_GITHUB_ENV$RATE_REMAINING <= n & !quiet) {
      message(paste0("Only ", TT_GITHUB_ENV$RATE_REMAINING, " Github queries remaining until ", 
          format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), "."))
  }`: argument is of length zero
  Backtrace:
      █
   1. └─tidytuesdayR:::check_api() test-10-utils.R:42:2
   2.   └─tidytuesdayR::rate_limit_check(quiet = TRUE) helper-tt_ref_test_that.R:17:2
  ── Error (test-11-last_tuesday.R:3:3): last_tuesday will give you the most recent tuesday ──
  Error in `if (TT_GITHUB_ENV$RATE_REMAINING == 0 & !quiet) {
      if (!getOption("tidytuesdayR.tt_testing", FALSE)) {
          rate_limit_update()
      }
      if (TT_GITHUB_ENV$RATE_REMAINING == 0) {
          message("Github API Rate Limit hit. You must wait until ", 
              format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), 
              " to make calls again!")
      }
  } else if (TT_GITHUB_ENV$RATE_REMAINING <= n & !quiet) {
      message(paste0("Only ", TT_GITHUB_ENV$RATE_REMAINING, " Github queries remaining until ", 
          format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), "."))
  }`: argument is of length zero
  Backtrace:
      █
   1. └─tidytuesdayR:::check_api() test-11-last_tuesday.R:3:2
   2.   └─tidytuesdayR::rate_limit_check(quiet = TRUE) helper-tt_ref_test_that.R:17:2
  ── Error (test-11-last_tuesday.R:33:3): tt_date will give you the date of the tuesday ──
  Error in `if (TT_GITHUB_ENV$RATE_REMAINING == 0 & !quiet) {
      if (!getOption("tidytuesdayR.tt_testing", FALSE)) {
          rate_limit_update()
      }
      if (TT_GITHUB_ENV$RATE_REMAINING == 0) {
          message("Github API Rate Limit hit. You must wait until ", 
              format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), 
              " to make calls again!")
      }
  } else if (TT_GITHUB_ENV$RATE_REMAINING <= n & !quiet) {
      message(paste0("Only ", TT_GITHUB_ENV$RATE_REMAINING, " Github queries remaining until ", 
          format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), "."))
  }`: argument is of length zero
  Backtrace:
      █
   1. └─tidytuesdayR:::check_api() test-11-last_tuesday.R:33:2
   2.   └─tidytuesdayR::rate_limit_check(quiet = TRUE) helper-tt_ref_test_that.R:17:2
  ── Error (test-12-encoding.R:6:5): Korean: Non-English encodings don't fail reading unicode from github ──
  Error in `if (TT_GITHUB_ENV$RATE_REMAINING == 0 & !quiet) {
      if (!getOption("tidytuesdayR.tt_testing", FALSE)) {
          rate_limit_update()
      }
      if (TT_GITHUB_ENV$RATE_REMAINING == 0) {
          message("Github API Rate Limit hit. You must wait until ", 
              format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), 
              " to make calls again!")
      }
  } else if (TT_GITHUB_ENV$RATE_REMAINING <= n & !quiet) {
      message(paste0("Only ", TT_GITHUB_ENV$RATE_REMAINING, " Github queries remaining until ", 
          format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), "."))
  }`: argument is of length zero
  Backtrace:
      █
   1. └─tidytuesdayR:::check_api() test-12-encoding.R:6:4
   2.   └─tidytuesdayR::rate_limit_check(quiet = TRUE) helper-tt_ref_test_that.R:17:2
  ── Error (test-12-encoding.R:17:5): Japanese: Non-English encodings don't fail reading unicode from github ──
  Error in `if (TT_GITHUB_ENV$RATE_REMAINING == 0 & !quiet) {
      if (!getOption("tidytuesdayR.tt_testing", FALSE)) {
          rate_limit_update()
      }
      if (TT_GITHUB_ENV$RATE_REMAINING == 0) {
          message("Github API Rate Limit hit. You must wait until ", 
              format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), 
              " to make calls again!")
      }
  } else if (TT_GITHUB_ENV$RATE_REMAINING <= n & !quiet) {
      message(paste0("Only ", TT_GITHUB_ENV$RATE_REMAINING, " Github queries remaining until ", 
          format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), "."))
  }`: argument is of length zero
  Backtrace:
      █
   1. └─tidytuesdayR:::check_api() test-12-encoding.R:17:4
   2.   └─tidytuesdayR::rate_limit_check(quiet = TRUE) helper-tt_ref_test_that.R:17:2
  ── Error (test-12-encoding.R:28:5): Russian: Non-English encodings don't fail reading unicode from github ──
  Error in `if (TT_GITHUB_ENV$RATE_REMAINING == 0 & !quiet) {
      if (!getOption("tidytuesdayR.tt_testing", FALSE)) {
          rate_limit_update()
      }
      if (TT_GITHUB_ENV$RATE_REMAINING == 0) {
          message("Github API Rate Limit hit. You must wait until ", 
              format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), 
              " to make calls again!")
      }
  } else if (TT_GITHUB_ENV$RATE_REMAINING <= n & !quiet) {
      message(paste0("Only ", TT_GITHUB_ENV$RATE_REMAINING, " Github queries remaining until ", 
          format(TT_GITHUB_ENV$RATE_RESET, "%Y-%m-%d %r %Z"), "."))
  }`: argument is of length zero
  Backtrace:
      █
   1. └─tidytuesdayR:::check_api() test-12-encoding.R:28:4
   2.   └─tidytuesdayR::rate_limit_check(quiet = TRUE) helper-tt_ref_test_that.R:17:2
  
  [ FAIL 10 | WARN 0 | SKIP 0 | PASS 102 ]
  Error: Test failures
  Execution halted