Running ‘testthat.R’ [23s/31s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(dtplyr)
  > 
  > test_check("dtplyr")
  Saving _problems/test-step-mutate-177.R
  Saving _problems/test-step-mutate-187.R
  Saving _problems/test-step-mutate-294.R
  Saving _problems/test-tidyeval-332.R
  [ FAIL 4 | WARN 0 | SKIP 36 | PASS 746 ]
  
  ══ Skipped tests (36) ══════════════════════════════════════════════════════════
  • On CRAN (35): 'test-count.R:15:1', 'test-step-call-pivot_longer.R:47:1',
    'test-step-call-pivot_longer.R:88:1', 'test-step-call-pivot_longer.R:142:1',
    'test-step-call-pivot_wider.R:95:1', 'test-step-call-pivot_wider.R:131:1',
    'test-step-call-pivot_wider.R:143:1', 'test-step-call-pivot_wider.R:156:1',
    'test-step-call.R:62:1', 'test-step-call.R:70:1', 'test-step-call.R:136:1',
    'test-step-call.R:179:1', 'test-step-colorder-relocate.R:62:1',
    'test-step-colorder.R:25:1', 'test-step-colorder.R:41:1',
    'test-step-group.R:22:1', 'test-step-join.R:346:1',
    'test-step-mutate.R:148:1', 'test-step-subset-filter.R:111:1',
    'test-step-subset-select.R:35:1', 'test-step-subset-select.R:122:1',
    'test-step-subset-separate.R:47:1', 'test-step-subset-slice.R:142:1',
    'test-step-subset-slice.R:173:1', 'test-step-subset-summarise.R:94:1',
    'test-step.R:23:1', 'test-step.R:32:1', 'test-tidyeval-across.R:86:1',
    'test-tidyeval-across.R:95:1', 'test-tidyeval-across.R:287:1',
    'test-tidyeval-across.R:295:1', 'test-tidyeval.R:183:1',
    'test-tidyeval.R:297:1', 'test-tidyeval.R:404:1', 'test-unite.R:69:1'
  • tidyselect issue #221 (1): 'test-tidyeval-across.R:305:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-step-mutate.R:177:3'): works with `.by` ────────────────────────
  Error in ``[.data.table`(copy(`_DT62`), , `:=`(row_num = seq_len(.N)), by = .(y))`: attempt access index 2/2 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-step-mutate.R:177:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─tibble::as_tibble(step)
    5. ├─dtplyr:::as_tibble.dtplyr_step(step)
    6. │ ├─tibble::as_tibble(dt_eval(x), .name_repair = .name_repair)
    7. │ └─dtplyr:::dt_eval(x)
    8. │   └─rlang::eval_tidy(quo)
    9. ├─copy(`_DT62`)[, `:=`(row_num = seq_len(.N)), by = .(y)]
   10. └─data.table:::`[.data.table`(...)
  ── Error ('test-step-mutate.R:183:3'): Using `.by` doesn't group prior step, #439 ──
  Error in ``[.data.table`(DT[, .(x, y)], , `:=`(row_num = seq_len(.N)), by = .(y))`: attempt access index 2/2 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─... %>% as.data.frame() at test-step-mutate.R:183:3
   2. ├─base::as.data.frame(.)
   3. └─dtplyr:::as.data.frame.dtplyr_step(.)
   4.   ├─base::as.data.frame(dt_eval(x))
   5.   └─dtplyr:::dt_eval(x)
   6.     └─base::eval(x$locals[[var]], env)
   7.       └─base::eval(x$locals[[var]], env)
   8.         ├─DT[, .(x, y)][, `:=`(row_num = seq_len(.N)), by = .(y)]
   9.         └─data.table:::`[.data.table`(...)
  ── Error ('test-step-mutate.R:291:3'): var = NULL works when data is grouped ───
  Error in ``[.data.table`(copy(DT), , `:=`(c("y", "z"), {     y <- 2     z <- y * 2     .(y, z) }), by = .(g))`: attempt access index 2/2 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-step-mutate.R:291:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─dplyr::collect(step)
    5. ├─dtplyr:::collect.dtplyr_step(step)
    6. │ ├─tibble::as_tibble(x)
    7. │ └─dtplyr:::as_tibble.dtplyr_step(x)
    8. │   ├─tibble::as_tibble(dt_eval(x), .name_repair = .name_repair)
    9. │   └─dtplyr:::dt_eval(x)
   10. │     └─rlang::eval_tidy(quo)
   11. ├─...[]
   12. └─data.table:::`[.data.table`(...)
  ── Error ('test-tidyeval.R:329:3'): row_number() is equivalent seq_len(.N) ─────
  Error in ``[.data.table`(copy(`_DT192`), , `:=`(n = seq_len(.N)), by = .(g))`: attempt access index 2/2 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-tidyeval.R:329:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─dt %>% group_by(g) %>% mutate(n = row_number()) %>% pull()
    5. ├─dplyr::pull(.)
    6. ├─dtplyr:::pull.dtplyr_step(.)
    7. │ ├─dplyr::collect(.data)
    8. │ └─dtplyr:::collect.dtplyr_step(.data)
    9. │   ├─tibble::as_tibble(x)
   10. │   └─dtplyr:::as_tibble.dtplyr_step(x)
   11. │     ├─tibble::as_tibble(dt_eval(x), .name_repair = .name_repair)
   12. │     └─dtplyr:::dt_eval(x)
   13. │       └─rlang::eval_tidy(quo)
   14. ├─copy(`_DT192`)[, `:=`(n = seq_len(.N)), by = .(g)]
   15. └─data.table:::`[.data.table`(...)
  
  [ FAIL 4 | WARN 0 | SKIP 36 | PASS 746 ]
  Error:
  ! Test failures.
  Execution halted