Running 'testthat.R' [52s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(posterior)
  This is posterior version 1.7.0
  
  Attaching package: 'posterior'
  
  The following objects are masked from 'package:stats':
  
      mad, sd, var
  
  The following objects are masked from 'package:base':
  
      %in%, match
  
  > 
  > test_check("posterior")
  Saving _problems/test-rvar-apply-10.R
  Saving _problems/test-rvar-apply-23.R
  Saving _problems/test-rvar-apply-39.R
  Saving _problems/test-rvar-apply-73.R
  [ FAIL 4 | WARN 0 | SKIP 5 | PASS 2005 ]
  
  ══ Skipped tests (5) ═══════════════════════════════════════════════════════════
  • On CRAN (5): 'test-print.R:55:3', 'test-print.R:114:3', 'test-rstar.R:113:3',
    'test-rvar-print.R:207:3', 'test-subset_draws.R:222:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-rvar-apply.R:10:3'): base apply family functions work ──────────
  Error in `attributes(newX) <- list(dim = c(prod(d.call), d2))`: dims [product 12] do not match the length of object [0]
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-rvar-apply.R:10:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─base::apply(x, 1, function(x) sum(draws_of(x)))
  ── Error ('test-rvar-apply.R:23:3'): base apply family functions work with rvar_factor ──
  Error in `attributes(newX) <- list(dim = c(prod(d.call), d2))`: dims [product 12] do not match the length of object [0]
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-rvar-apply.R:23:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─base::apply(x, 1, function(x) sum(draws_of(x) == "a"))
  ── Error ('test-rvar-apply.R:39:3'): rvar_apply works ──────────────────────────
  Error in `attributes(newX) <- list(dim = c(prod(d.call), d2))`: dims [product 18] do not match the length of object [0]
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-rvar-apply.R:39:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─posterior::rvar_apply(x, 1, rvar_mean)
   5.   └─base::apply(.x, .margin, .f, ...)
  ── Error ('test-rvar-apply.R:73:3'): rvar_apply works with rvar_factor ─────────
  Error in `attributes(newX) <- list(dim = c(prod(d.call), d2))`: dims [product 18] do not match the length of object [0]
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(rvar_apply(x, 1, identity), x) at test-rvar-apply.R:73:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─posterior::rvar_apply(x, 1, identity)
   5.   └─base::apply(.x, .margin, .f, ...)
  
  [ FAIL 4 | WARN 0 | SKIP 5 | PASS 2005 ]
  Error:
  ! Test failures.
  Execution halted