Running 'testthat.R' [367s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(quickcheck)
  > test_check("quickcheck")
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 460 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-data-table_of.R:1:1'): single_col_generator wraps a vector in a data frame subclass ──
  Falsifiable after 2 tests, and 5 shrinks
  <expectation_failure/expectation/error/condition>
  `.` is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  Backtrace:
       x
    1. +-quickcheck::for_all(...)
    2. | \-hedgehog::forall(...)
    3. |   \-hedgehog:::run.prop(property, counterexample$smallest, curry)
    4. |     +-base::tryCatch(...)
    5. |     | \-base (local) tryCatchList(expr, classes, parentenv, handlers)
    6. |     |   \-base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
    7. |     |     \-base (local) doTryCatch(return(expr), name, parentenv, handler)
    8. |     +-base::withCallingHandlers(...)
    9. |     +-base::do.call(property, arguments)
   10. |     \-quickcheck (local) `<fn>`(a = `<dt[,1]>`)
   11. |       \-(is_vector(a$col_a) && .p(a)) %>% testthat::expect_true()
   12. \-testthat::expect_true(.)
  Counterexample:
  $a
     generator
  1:      2244
  2:      2244
  3:      2244
  4:      2244
  
  Backtrace:
      ▆
   1. └─quickcheck::for_all(...)
   2.   └─hedgehog::forall(...)
  ── Failure ('test-data_frame_of.R:1:1'): single_col_generator wraps a vector in a data frame subclass ──
  Falsifiable after 1 tests, and 8 shrinks
  <expectation_failure/expectation/error/condition>
  `.` is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  Backtrace:
       x
    1. +-quickcheck::for_all(...)
    2. | \-hedgehog::forall(...)
    3. |   \-hedgehog:::run.prop(property, counterexample$smallest, curry)
    4. |     +-base::tryCatch(...)
    5. |     | \-base (local) tryCatchList(expr, classes, parentenv, handlers)
    6. |     |   \-base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
    7. |     |     \-base (local) doTryCatch(return(expr), name, parentenv, handler)
    8. |     +-base::withCallingHandlers(...)
    9. |     +-base::do.call(property, arguments)
   10. |     \-quickcheck (local) `<fn>`(a = `<df[,1]>`)
   11. |       \-(is_vector(a$col_a) && .p(a)) %>% testthat::expect_true()
   12. \-testthat::expect_true(.)
  Counterexample:
  $a
    generator
  1     -3125
  2     -3125
  3     -3125
  4     -3125
  5     -3125
  
  Backtrace:
      ▆
   1. └─quickcheck::for_all(...)
   2.   └─hedgehog::forall(...)
  ── Failure ('test-tibble_of.R:1:1'): single_col_generator wraps a vector in a data frame subclass ──
  Falsifiable after 1 tests, and 10 shrinks
  <expectation_failure/expectation/error/condition>
  `.` is not TRUE
  
  `actual`:   FALSE
  `expected`: TRUE 
  Backtrace:
       x
    1. +-quickcheck::for_all(...)
    2. | \-hedgehog::forall(...)
    3. |   \-hedgehog:::run.prop(property, counterexample$smallest, curry)
    4. |     +-base::tryCatch(...)
    5. |     | \-base (local) tryCatchList(expr, classes, parentenv, handlers)
    6. |     |   \-base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
    7. |     |     \-base (local) doTryCatch(return(expr), name, parentenv, handler)
    8. |     +-base::withCallingHandlers(...)
    9. |     +-base::do.call(property, arguments)
   10. |     \-quickcheck (local) `<fn>`(a = `<tibble[,1]>`)
   11. |       \-(is_vector(a$col_a) && .p(a)) %>% testthat::expect_true()
   12. \-testthat::expect_true(.)
  Counterexample:
  $a
  # A tibble: 6 x 1
    generator
        <int>
  1      3314
  2      3314
  3      3314
  4      3314
  5      3314
  6      3314
  
  Backtrace:
      ▆
   1. └─quickcheck::for_all(...)
   2.   └─hedgehog::forall(...)
  
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 460 ]
  Error: Test failures
  Execution halted