Running ‘testthat.R’ [3s/6s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # setting R_TESTS to empty string because of
  > # https://github.com/hadley/testthat/issues/144
  > # revert this when that issue in R is fixed.
  > Sys.setenv("R_TESTS" = "")
  > 
  > library(testthat)
  > library(rollinglda)
  Loading required package: ldaPrototype
  > library(data.table)
  > library(lubridate)
  
  Attaching package: 'lubridate'
  
  The following objects are masked from 'package:data.table':
  
      hour, isoweek, mday, minute, month, quarter, second, wday, week,
      yday, year
  
  The following objects are masked from 'package:base':
  
      date, intersect, setdiff, union
  
  > 
  > test_check("rollinglda")
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test_RollingLDA.R:6:1): (code run outside of `test_that()`) ──────────
  Error in `data.frame(job.id = as.integer(job))`: 'list' object cannot be coerced to type 'integer'
  Backtrace:
      █
   1. ├─rollinglda::RollingLDA(...) test_RollingLDA.R:6:0
   2. └─rollinglda:::RollingLDA.default(...)
   3.   ├─ldaPrototype::getLDA(...)
   4.   └─ldaPrototype::LDAPrototype(docs = docs, vocabLDA = vocab, ...)
   5.     ├─ldaPrototype::getPrototype(...)
   6.     └─ldaPrototype:::getPrototype.LDARep(...)
   7.       ├─ldaPrototype::getLDA(x)
   8.       └─ldaPrototype:::getLDA.LDARep(x)
   9.         └─base::data.frame(job.id = as.integer(job))
  ── Error (test_getter_and_asRollingLDA.R:6:1): (code run outside of `test_that()`) ──
  Error in `data.frame(job.id = as.integer(job))`: 'list' object cannot be coerced to type 'integer'
  Backtrace:
      █
   1. ├─rollinglda::RollingLDA(...) test_getter_and_asRollingLDA.R:6:0
   2. └─rollinglda:::RollingLDA.default(...)
   3.   ├─ldaPrototype::getLDA(...)
   4.   └─ldaPrototype::LDAPrototype(docs = docs, vocabLDA = vocab, ...)
   5.     ├─ldaPrototype::getPrototype(...)
   6.     └─ldaPrototype:::getPrototype.LDARep(...)
   7.       ├─ldaPrototype::getLDA(x)
   8.       └─ldaPrototype:::getLDA.LDARep(x)
   9.         └─base::data.frame(job.id = as.integer(job))
  ── Error (test_isRollingLDA.R:6:1): (code run outside of `test_that()`) ────────
  Error in `getLDA.LDARep(LDARep(docs = docs, vocab = vocab, n = 1, ...))`: Assertion on 'job$job.id' failed: Element 3 is not >= 1.
  Backtrace:
      █
   1. ├─rollinglda::RollingLDA(...) test_isRollingLDA.R:6:0
   2. └─rollinglda:::RollingLDA.default(...)
   3.   ├─ldaPrototype::getLDA(...)
   4.   └─ldaPrototype:::getLDA.LDARep(...)
   5.     └─checkmate::assert_integerish(...)
   6.       └─checkmate::makeAssertion(x, res, .var.name, add)
   7.         └─checkmate:::mstop(...)
  
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 0 ]
  Error: Test failures
  Execution halted