Running ‘spelling.R’
  Running ‘testthat.R’ [10s/10s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(tidylda)
  tidylda is under active development. The API and behavior may change.
  > 
  > test_check("tidylda")
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  Error in calc_sum_squares_latent(Y = Y, X = Yhat[[1]], W = Yhat[[2]],  : 
    calc_r2 failed. R-squared corrupted.
  [ FAIL 2 | WARN 0 | SKIP 0 | PASS 186 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-print.tidylda.R:32:3): print.tidylda behaves as expected ────────
  Error in `round(x$r2, digits = digits)`: non-numeric argument to mathematical function
  Backtrace:
      ▆
   1. ├─utils::capture.output(print(lda)) at test-print.tidylda.R:32:2
   2. │ └─base::withVisible(...elt(i))
   3. ├─base::print(lda)
   4. └─tidylda:::print.tidylda(lda)
   5.   └─base::cat(...)
  ── Failure (test-tidylda-fit-methods.R:31:3): can fit lda models without error ──
  lda$r2 has type 'character', not 'double'.
  
  [ FAIL 2 | WARN 0 | SKIP 0 | PASS 186 ]
  Error: Test failures
  Execution halted