Running ‘testthat.R’ [13s/246s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # This file is part of the standard setup for testthat.
  > # It is recommended that you do not modify it.
  > #
  > # Where should you do additional test configuration?
  > # Learn more about the roles of various files in:
  > # * https://r-pkgs.org/tests.html
  > # * https://testthat.r-lib.org/reference/test_package.html#special-files
  > 
  > library(testthat)
  > library(ispdata)
  > 
  > test_check("ispdata")
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  Query completed.
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  Query completed.
  Query completed.
  Query completed.
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  Query completed.
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  ℹ Using "','" as decimal and "'.'" as grouping mark. Use `read_delim()` for more control.
  `curl` package not installed, falling back to using `url()`
  Query completed.
  Query completed.
  Query completed.
  [ FAIL 2 | WARN 2 | SKIP 0 | PASS 52 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-monthly_stats.R:3'): (code run outside of `test_that()`) ───────
  Error in `(function (con, what, n = 1L, size = NA_integer_, signed = TRUE, 
      endian = .Platform$endian) 
  {
      if (!endian %in% c("big", "little", "swap")) 
          stop("invalid 'endian' argument")
      if (is.character(con)) {
          con <- file(con, "rb")
          on.exit(close(con))
      }
      swap <- endian != .Platform$endian
      if (!is.character(what) || is.na(what) || length(what) != 
          1L || !any(what == c("numeric", "double", "integer", 
          "int", "logical", "complex", "character", "raw"))) 
          what <- typeof(what)
      .Internal(readBin(con, what, n, size, signed, swap))
  })(structure(4L, class = c("url", "connection"), conn_id = <pointer: 0x1e2>), 
      raw(0), 131071L)`: cannot read from connection
  Backtrace:
      ▆
   1. ├─ispdata::monthly_stats(by = "cisp") at test-monthly_stats.R:3:0
   2. │ ├─janitor::clean_names(...)
   3. │ └─readr::read_csv2(...)
   4. │   └─vroom::vroom(...)
   5. │     └─vroom:::vroom_(...)
   6. └─base (local) `<fn>`(`<url>`, `<raw>`, 131071L)
  ── Error ('test-population.R:16'): (code run outside of `test_that()`) ─────────
  Error in `(function (con, what, n = 1L, size = NA_integer_, signed = TRUE, 
      endian = .Platform$endian) 
  {
      if (!endian %in% c("big", "little", "swap")) 
          stop("invalid 'endian' argument")
      if (is.character(con)) {
          con <- file(con, "rb")
          on.exit(close(con))
      }
      swap <- endian != .Platform$endian
      if (!is.character(what) || is.na(what) || length(what) != 
          1L || !any(what == c("numeric", "double", "integer", 
          "int", "logical", "complex", "character", "raw"))) 
          what <- typeof(what)
      .Internal(readBin(con, what, n, size, signed, swap))
  })(structure(5L, class = c("url", "connection"), conn_id = <pointer: 0x1fd>), 
      raw(0), 131071L)`: cannot read from connection
  Backtrace:
      ▆
   1. ├─ispdata::population(data = "muni_monthly") at test-population.R:16:0
   2. │ ├─janitor::clean_names(...)
   3. │ └─readr::read_csv2(link, show_col_types = FALSE, locale = readr::locale(encoding = "latin1"))
   4. │   └─vroom::vroom(...)
   5. │     └─vroom:::vroom_(...)
   6. └─base (local) `<fn>`(`<url>`, `<raw>`, 131071L)
  
  [ FAIL 2 | WARN 2 | SKIP 0 | PASS 52 ]
  Error: Test failures
  Execution halted