Running 'testthat.R' [85s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(crimedata)
  > 
  > test_check("crimedata")
  
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |======================================================================| 100%
  
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |======                                                                |   9%
    |                                                                            
    |===================================                                   |  50%
    |                                                                            
    |==================================================                    |  71%
    |                                                                            
    |====================================================                  |  74%
    |                                                                            
    |==================================================================    |  95%
    |                                                                            
    |======================================================================| 100%
  
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |======================================================================| 100%
  
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |======                                                                |   9%
    |                                                                            
    |===================================                                   |  50%
    |                                                                            
    |=========================================================             |  81%
    |                                                                            
    |=============================================================         |  88%
    |                                                                            
    |======================================================================| 100%
  [ FAIL 3 | WARN 3 | SKIP 0 | PASS 31 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test_get_crime_data.R:4:3): return value of get_crime_data is a tibble or SF object ──
  Error in `curl::curl_fetch_memory(url, handle = handle)`: Timeout was reached: [osf.io] Operation timed out after 10007 milliseconds with 0 out of 0 bytes received
  Backtrace:
       ▆
    1. ├─testthat::expect_is(get_crime_data(), "tbl_df") at test_get_crime_data.R:4:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─crimedata::get_crime_data()
    5. │ └─... %>% dplyr::arrange(.data$uid)
    6. ├─dplyr::arrange(., .data$uid)
    7. ├─dplyr::bind_rows(.)
    8. │ └─rlang::list2(...)
    9. ├─purrr::map(...)
   10. │ └─crimedata .f(.x[[i]], ...)
   11. │   ├─... %>% writeBin(temp_file)
   12. │   └─httr::GET(x[["file_url"]], progress(type = "down"))
   13. │     └─httr:::request_perform(req, hu$handle$handle)
   14. │       ├─httr:::request_fetch(req$output, req$url, handle)
   15. │       └─httr:::request_fetch.write_memory(req$output, req$url, handle)
   16. │         └─curl::curl_fetch_memory(url, handle = handle)
   17. ├─base::writeBin(., temp_file)
   18. └─httr::content(., as = "raw")
   19.   ├─base::stopifnot(is.response(x))
   20.   └─httr:::is.response(x)
  ── Error (test_get_crime_data.R:21:3): partially missing data produce warnings ──
  Error in `curl::curl_fetch_memory(url, handle = handle)`: Timeout was reached: [osf.io] Operation timed out after 10014 milliseconds with 0 out of 0 bytes received
  Backtrace:
       ▆
    1. ├─testthat::expect_warning(...) at test_get_crime_data.R:21:2
    2. │ └─testthat:::quasi_capture(enquo(object), label, capture_warnings)
    3. │   ├─testthat .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─crimedata::get_crime_data(cities = "Virginia Beach", years = 2012:2013)
    7. │ └─... %>% dplyr::arrange(.data$uid)
    8. ├─dplyr::arrange(., .data$uid)
    9. ├─dplyr::bind_rows(.)
   10. │ └─rlang::list2(...)
   11. ├─purrr::map(...)
   12. │ └─crimedata .f(.x[[i]], ...)
   13. │   ├─... %>% writeBin(temp_file)
   14. │   └─httr::GET(x[["file_url"]], progress(type = "down"))
   15. │     └─httr:::request_perform(req, hu$handle$handle)
   16. │       ├─httr:::request_fetch(req$output, req$url, handle)
   17. │       └─httr:::request_fetch.write_memory(req$output, req$url, handle)
   18. │         └─curl::curl_fetch_memory(url, handle = handle)
   19. ├─base::writeBin(., temp_file)
   20. └─httr::content(., as = "raw")
   21.   ├─base::stopifnot(is.response(x))
   22.   └─httr:::is.response(x)
  ── Error (test_get_crime_data.R:28:3): quiet execution does not return any messages ──
  Error in `curl::curl_fetch_memory(url, handle = handle)`: Timeout was reached: [osf.io] Operation timed out after 10006 milliseconds with 0 out of 0 bytes received
  Backtrace:
       ▆
    1. ├─testthat::expect_message(get_crime_data(quiet = TRUE), NA) at test_get_crime_data.R:28:2
    2. │ └─testthat:::quasi_capture(enquo(object), label, capture_messages)
    3. │   ├─testthat .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─crimedata::get_crime_data(quiet = TRUE)
    7. │ └─... %>% dplyr::arrange(.data$uid)
    8. ├─dplyr::arrange(., .data$uid)
    9. ├─dplyr::bind_rows(.)
   10. │ └─rlang::list2(...)
   11. ├─purrr::map(...)
   12. │ └─crimedata .f(.x[[i]], ...)
   13. │   ├─... %>% writeBin(temp_file)
   14. │   └─httr::GET(x[["file_url"]], progress(type = "down"))
   15. │     └─httr:::request_perform(req, hu$handle$handle)
   16. │       ├─httr:::request_fetch(req$output, req$url, handle)
   17. │       └─httr:::request_fetch.write_memory(req$output, req$url, handle)
   18. │         └─curl::curl_fetch_memory(url, handle = handle)
   19. ├─base::writeBin(., temp_file)
   20. └─httr::content(., as = "raw")
   21.   ├─base::stopifnot(is.response(x))
   22.   └─httr:::is.response(x)
  
  [ FAIL 3 | WARN 3 | SKIP 0 | PASS 31 ]
  Error: Test failures
  Execution halted