Running ‘testthat.R’ [48s/109s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(tidyhydat)
  > library(dplyr)
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  > library(lubridate)
  
  Attaching package: 'lubridate'
  
  The following objects are masked from 'package:base':
  
      date, intersect, setdiff, union
  
  > 
  > test_check("tidyhydat")
  [ FAIL 2 | WARN 0 | SKIP 18 | PASS 201 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (18)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test_search.R:5:3): search_stn_number returns a dataframe ────────────
  Error in `curl::curl_fetch_memory(url, handle = handle)`: Timeout was reached: [dd.weather.gc.ca] Connection timeout after 10001 ms
  Backtrace:
       ▆
    1. ├─testthat::expect_is(...) at test_search.R:5:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─tidyhydat::search_stn_number("08HF", hydat_path = hy_test_db())
    5. │ ├─... %>% ...
    6. │ └─tidyhydat::realtime_stations()
    7. │   └─httr::GET(realtime_link, httr::user_agent("https://github.com/ropensci/tidyhydat"))
    8. │     └─httr:::request_perform(req, hu$handle$handle)
    9. │       ├─httr:::request_fetch(req$output, req$url, handle)
   10. │       └─httr:::request_fetch.write_memory(req$output, req$url, handle)
   11. │         └─curl::curl_fetch_memory(url, handle = handle)
   12. ├─dplyr::select(...)
   13. ├─dplyr::distinct(., .data$STATION_NUMBER, .keep_all = TRUE)
   14. └─dplyr::bind_rows(., suppressMessages(hy_stations(hydat_path = hydat_con)))
   15.   └─rlang::list2(...)
  ── Error (test_search.R:11:3): search_stn_name returns a dataframe ─────────────
  Error in `curl::curl_fetch_memory(url, handle = handle)`: Timeout was reached: [dd.weather.gc.ca] Connection timeout after 10000 ms
  Backtrace:
       ▆
    1. ├─testthat::expect_is(...) at test_search.R:11:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─tidyhydat::search_stn_name("Saskatchewan", hydat_path = hy_test_db())
    5. │ ├─... %>% ...
    6. │ └─tidyhydat::realtime_stations()
    7. │   └─httr::GET(realtime_link, httr::user_agent("https://github.com/ropensci/tidyhydat"))
    8. │     └─httr:::request_perform(req, hu$handle$handle)
    9. │       ├─httr:::request_fetch(req$output, req$url, handle)
   10. │       └─httr:::request_fetch.write_memory(req$output, req$url, handle)
   11. │         └─curl::curl_fetch_memory(url, handle = handle)
   12. ├─dplyr::select(...)
   13. ├─dplyr::distinct(., .data$STATION_NUMBER, .keep_all = TRUE)
   14. └─dplyr::bind_rows(., suppressMessages(hy_stations(hydat_path = hydat_con)))
   15.   └─rlang::list2(...)
  
  [ FAIL 2 | WARN 0 | SKIP 18 | PASS 201 ]
  Error: Test failures
  Execution halted