Running ‘testthat.R’ [19s/21s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(nbTransmission)
  > 
  > test_check("nbTransmission")
  
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |======================================================================| 100%
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |===================================                                   |  50%
    |                                                                            
    |======================================================================| 100%
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |======================================================================| 100%
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |===================================                                   |  50%
    |                                                                            
    |======================================================================| 100%
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |===================================                                   |  50%
    |                                                                            
    |======================================================================| 100%Saving _problems/test_visualizeResults-225.R
  Saving _problems/test_visualizeResults-228.R
  Saving _problems/test_visualizeResults-231.R
  [ FAIL 3 | WARN 2 | SKIP 1 | PASS 130 ]
  
  ══ Skipped tests (1) ═══════════════════════════════════════════════════════════
  • {Hmisc} is not installed. (1): 'test_visualizeResults.R:197:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test_visualizeResults.R:224:3'): Descriptive error messages returned for plotRt ──
  `plotRt(rFinal2, includeRtAvgCI = TRUE)` threw an error with unexpected message.
  Expected match: "Please provide a rData list that has confidence intervals"
  Actual message: "there is no package called 'Hmisc'"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test_visualizeResults.R:224:3
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─nbTransmission::plotRt(rFinal2, includeRtAvgCI = TRUE)
    7. │ └─base::gsub("s$", "", Hmisc::capitalize(rData$timeFrame))
    8. │   └─base::is.factor(x)
    9. └─base::loadNamespace(x)
   10.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   11.     └─base (local) withOneRestart(expr, restarts[[1L]])
   12.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test_visualizeResults.R:227:3'): Descriptive error messages returned for plotRt ──
  `plotRt(rFinal2, includeRtCI = TRUE)` threw an error with unexpected message.
  Expected match: "Please provide a rData list that has confidence intervals"
  Actual message: "there is no package called 'Hmisc'"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(plotRt(rFinal2, includeRtCI = TRUE), "Please provide a rData list that has confidence intervals") at test_visualizeResults.R:227:3
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─nbTransmission::plotRt(rFinal2, includeRtCI = TRUE)
    7. │ └─base::gsub("s$", "", Hmisc::capitalize(rData$timeFrame))
    8. │   └─base::is.factor(x)
    9. └─base::loadNamespace(x)
   10.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   11.     └─base (local) withOneRestart(expr, restarts[[1L]])
   12.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test_visualizeResults.R:230:3'): Descriptive error messages returned for plotRt ──
  `plotRt(rFinal2, includeRtCI = TRUE, includeRtAvgCI = TRUE)` threw an error with unexpected message.
  Expected match: "Please provide a rData list that has confidence intervals"
  Actual message: "there is no package called 'Hmisc'"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test_visualizeResults.R:230:3
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─nbTransmission::plotRt(rFinal2, includeRtCI = TRUE, includeRtAvgCI = TRUE)
    7. │ └─base::gsub("s$", "", Hmisc::capitalize(rData$timeFrame))
    8. │   └─base::is.factor(x)
    9. └─base::loadNamespace(x)
   10.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   11.     └─base (local) withOneRestart(expr, restarts[[1L]])
   12.       └─base (local) doWithOneRestart(return(expr), restart)
  
  [ FAIL 3 | WARN 2 | SKIP 1 | PASS 130 ]
  Error:
  ! Test failures.
  Execution halted