Running ‘testthat.R’ [28s/39s]
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 25 | PASS 198 ]
  
  ══ Skipped tests (25) ══════════════════════════════════════════════════════════
  • On CRAN (25): 'test-hy-plot.R:2:3', 'test-hy-remote.R:2:3',
    'test-realtime-webservice.R:2:3', 'test-realtime-webservice.R:35:3',
    'test-realtime-webservice.R:50:3', 'test-realtime-webservice.R:68:3',
    'test_daily_mean.R:2:3', 'test_download_realtime.R:2:3',
    'test_download_realtime.R:22:3', 'test_download_realtime.R:41:3',
    'test_download_realtime.R:49:3', 'test_download_realtime.R:54:3',
    'test_hy_daily.R:3:3', 'test_hy_daily.R:10:3', 'test_hy_daily.R:20:3',
    'test_realtime_add_local_datetime.R:2:3',
    'test_realtime_add_local_datetime.R:13:3',
    'test_realtime_add_local_datetime.R:24:3', 'test_realtime_network.R:3:3',
    'test_realtime_plot.R:3:3', 'test_realtime_plot.R:9:3',
    'test_realtime_plot.R:15:3', 'test_realtime_plot.R:21:3',
    'test_realtime_plot.R:27:3', 'test_utils.R:27:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_search.R:3:3'): search_stn_number returns a dataframe ──────────
  Error in `if (length(res) == 0 || res == -1) {
      return(list(path = path, extension = ""))
  }`: missing value where TRUE/FALSE needed
  Backtrace:
       ▆
    1. ├─testthat::expect_s3_class(...) at test_search.R:3:3
    2. │ └─testthat::quasi_label(enquo(object), arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─tidyhydat::search_stn_number("08HF", hydat_path = hy_test_db())
    5. │ ├─dplyr::select(...)
    6. │ ├─dplyr::distinct(...)
    7. │ ├─dplyr::bind_rows(realtime_stations(), suppressMessages(hy_stations(hydat_path = hydat_con)))
    8. │ │ └─rlang::list2(...)
    9. │ └─tidyhydat::realtime_stations()
   10. │   └─readr::read_csv(...)
   11. │     └─vroom::vroom(...)
   12. │       └─vroom:::vroom_(...)
   13. └─vroom (local) `<fn>`(NA_character_)
   14.   └─vroom:::split_path_ext(basename_utf8(path))
  ── Error ('test_search.R:12:3'): search_stn_name returns a dataframe ───────────
  Error in `if (length(res) == 0 || res == -1) {
      return(list(path = path, extension = ""))
  }`: missing value where TRUE/FALSE needed
  Backtrace:
       ▆
    1. ├─testthat::expect_s3_class(...) at test_search.R:12:3
    2. │ └─testthat::quasi_label(enquo(object), arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─tidyhydat::search_stn_name("Saskatchewan", hydat_path = hy_test_db())
    5. │ ├─dplyr::select(...)
    6. │ ├─dplyr::distinct(...)
    7. │ ├─dplyr::bind_rows(realtime_stations(), suppressMessages(hy_stations(hydat_path = hydat_con)))
    8. │ │ └─rlang::list2(...)
    9. │ └─tidyhydat::realtime_stations()
   10. │   └─readr::read_csv(...)
   11. │     └─vroom::vroom(...)
   12. │       └─vroom:::vroom_(...)
   13. └─vroom (local) `<fn>`(NA_character_)
   14.   └─vroom:::split_path_ext(basename_utf8(path))
  
  [ FAIL 2 | WARN 0 | SKIP 25 | PASS 198 ]
  Error: Test failures
  Execution halted