Last updated on 2025-12-28 01:49:15 CET.
| Package | ERROR | OK |
|---|---|---|
| tidytable | 1 | 12 |
Current CRAN status: ERROR: 1, OK: 12
Version: 0.11.2
Check: examples
Result: ERROR
Running examples in 'tidytable-Ex.R' failed
The error most likely occurred in:
> ### Name: add_count
> ### Title: Add a count column to the data frame
> ### Aliases: add_count add_tally
>
> ### ** Examples
>
> df <- data.table(
+ a = c("a", "a", "b"),
+ b = 1:3
+ )
>
> df %>%
+ add_count(a)
Error in `[.data.table`(~.df, , `:=`(n = .N), by = "a", keyby = FALSE) :
attempt access index 2/2 in VECTOR_ELT
Calls: %>% ... mutate -> mutate.tidytable -> eval_tidy -> [ -> [.data.table
Execution halted
Flavor: r-devel-windows-x86_64
Version: 0.11.2
Check: tests
Result: ERROR
Running 'testthat.R' [24s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(tidytable)
Attaching package: 'tidytable'
The following objects are masked from 'package:stats':
dt, filter, lag
The following objects are masked from 'package:base':
%in%, %notin%
>
> test_check("tidytable")
Saving _problems/test-add_count-6.R
Saving _problems/test-add_count-20.R
Saving _problems/test-cur-context-34.R
Saving _problems/test-cur-context-45.R
Saving _problems/test-mutate-12.R
Saving _problems/test-mutate-130.R
Saving _problems/test-mutate-156.R
Saving _problems/test-mutate-183.R
Saving _problems/test-mutate-192.R
Saving _problems/test-mutate-230.R
Saving _problems/test-mutate-268.R
Saving _problems/test-mutate-276.R
Saving _problems/test-mutate-345.R
Saving _problems/test-mutate-382.R
Saving _problems/test-mutate-406.R
Saving _problems/test-mutate-420.R
Saving _problems/test-mutate-429.R
Saving _problems/test-mutate_rowwise-5.R
Saving _problems/test-mutate_rowwise-26.R
Saving _problems/test-mutate_rowwise-36.R
Saving _problems/test-mutate_rowwise-47.R
Saving _problems/test-mutate_rowwise-55.R
Saving _problems/test-mutate_rowwise-66.R
Saving _problems/test-rank-21.R
[ FAIL 24 | WARN 0 | SKIP 0 | PASS 1300 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-add_count.R:6:3'): adds count ──────────────────────────────────
Error in ``[.data.table`(~.df, , `:=`(n = .N), by = "g", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% add_count(g) at test-add_count.R:6:3
2. ├─tidytable::add_count(., g)
3. ├─tidytable:::add_count.tidytable(., g)
4. │ ├─tidytable::mutate(.df, `:=`(!!name, n()), .by = c(!!!.by))
5. │ └─tidytable:::mutate.tidytable(.df, `:=`(!!name, n()), .by = c(!!!.by))
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─.df[, `:=`(n = .N), by = "g", keyby = FALSE]
8. └─data.table:::`[.data.table`(.df, , `:=`(n = .N), by = "g", keyby = FALSE)
── Error ('test-add_count.R:18:3'): works on a grouped_tt ──────────────────────
Error in ``[.data.table`(~.df, , `:=`(n = .N), by = "g", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% group_by(g) %>% add_count() at test-add_count.R:18:3
2. ├─tidytable::add_count(.)
3. ├─tidytable:::add_count.grouped_tt(.)
4. │ ├─tidytable::add_count(...)
5. │ └─tidytable:::add_count.tidytable(...)
6. │ ├─tidytable::mutate(.df, `:=`(!!name, n()), .by = c(!!!.by))
7. │ └─tidytable:::mutate.tidytable(.df, `:=`(!!name, n()), .by = c(!!!.by))
8. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
9. ├─.df[, `:=`(n = .N), by = "g", keyby = FALSE]
10. └─data.table:::`[.data.table`(.df, , `:=`(n = .N), by = "g", keyby = FALSE)
── Error ('test-cur-context.R:31:3'): cur_group_rows() works ───────────────────
Error in ``[.data.table`(~.df, , `:=`(rows1 = seq_len(.N), rows_check = 1:.N), by = "y", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% ... at test-cur-context.R:31:3
2. ├─tidytable::mutate(...)
3. ├─tidytable:::mutate.tidytable(...)
4. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
5. ├─...[]
6. └─data.table:::`[.data.table`(...)
── Error ('test-cur-context.R:42:3'): cur_group_id() works ─────────────────────
Error in ``[.data.table`(~.df, , `:=`(id1 = .GRP, id_check = .GRP), by = "y", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% mutate(id1 = cur_group_id(), id_check = .GRP, .by = y) at test-cur-context.R:42:3
2. ├─tidytable::mutate(., id1 = cur_group_id(), id_check = .GRP, .by = y)
3. ├─tidytable:::mutate.tidytable(...)
4. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
5. ├─.df[, `:=`(id1 = .GRP, id_check = .GRP), by = "y", keyby = FALSE]
6. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:7:3'): can remove variables with NULL ─────────────────
Error in ``[.data.table`(~.df, , `:=`(c("x", "x_plus_y"), { x = NULL x = rep(1, 3) x_plus_y = x + y list(x, x_plus_y) }), by = "x", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% ... at test-mutate.R:7:3
2. ├─tidytable::mutate(...)
3. ├─tidytable:::mutate.data.frame(...)
4. │ ├─tidytable::mutate(...)
5. │ └─tidytable:::mutate.tidytable(...)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─...[]
8. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:129:3'): can mutate in order with .by ─────────────────
Error in ``[.data.table`(~.df, , `:=`(c("x", "y"), { x = x + 1 y = x + 1 list(x, y) }), by = "z", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% mutate(x = x + 1, y = x + 1, .by = z) at test-mutate.R:129:3
2. ├─tidytable::mutate(., x = x + 1, y = x + 1, .by = z)
3. ├─tidytable:::mutate.tidytable(., x = x + 1, y = x + 1, .by = z)
4. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
5. ├─...[]
6. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:155:3'): can use .N with .by ──────────────────────────
Error in ``[.data.table`(~.df, , `:=`(z = .N), by = "y", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% mutate(z = .N, .by = y) at test-mutate.R:155:3
2. ├─tidytable::mutate(., z = .N, .by = y)
3. ├─tidytable:::mutate.data.frame(., z = .N, .by = y)
4. │ ├─tidytable::mutate(...)
5. │ └─tidytable:::mutate.tidytable(...)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─.df[, `:=`(z = .N), by = "y", keyby = FALSE]
8. └─data.table:::`[.data.table`(.df, , `:=`(z = .N), by = "y", keyby = FALSE)
── Error ('test-mutate.R:182:3'): can use n() with by ──────────────────────────
Error in ``[.data.table`(~.df, , `:=`(z = .N), by = "y", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% mutate(z = n(), .by = y) at test-mutate.R:182:3
2. ├─tidytable::mutate(., z = n(), .by = y)
3. ├─tidytable:::mutate.data.frame(., z = n(), .by = y)
4. │ ├─tidytable::mutate(...)
5. │ └─tidytable:::mutate.tidytable(...)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─.df[, `:=`(z = .N), by = "y", keyby = FALSE]
8. └─data.table:::`[.data.table`(.df, , `:=`(z = .N), by = "y", keyby = FALSE)
── Error ('test-mutate.R:191:3'): can use .GRP ─────────────────────────────────
Error in ``[.data.table`(~.df, , `:=`(z = .GRP), by = "y", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% mutate(z = .GRP, .by = y) at test-mutate.R:191:3
2. ├─tidytable::mutate(., z = .GRP, .by = y)
3. ├─tidytable:::mutate.data.frame(., z = .GRP, .by = y)
4. │ ├─tidytable::mutate(...)
5. │ └─tidytable:::mutate.tidytable(...)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─.df[, `:=`(z = .GRP), by = "y", keyby = FALSE]
8. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:229:5'): can make custom functions with quosures ──────
Error in ``[.data.table`(~.df, , `:=`(stuff = x + val), by = "z", keyby = FALSE)`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% add_one(x, stuff, 1, z) at test-mutate.R:233:3
2. ├─tidytable (local) add_one(., x, stuff, 1, z)
3. │ └─.data %>% ... at test-mutate.R:229:5
4. ├─tidytable::mutate(...)
5. ├─tidytable:::mutate.data.frame(...)
6. │ ├─tidytable::mutate(...)
7. │ └─tidytable:::mutate.tidytable(...)
8. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
9. ├─.df[, `:=`(stuff = x + val), by = "z", keyby = FALSE]
10. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:268:3'): .keep = 'none' only keeps grouping variables ──
Error in ``[.data.table`(~.df, , `:=`(z = 1), by = "x", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_named(...) at test-mutate.R:268:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─tidytable::mutate(df, z = 1, .by = x, .keep = "none")
5. ├─tidytable:::mutate.tidytable(df, z = 1, .by = x, .keep = "none")
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─.df[, `:=`(z = 1), by = "x", keyby = FALSE]
8. └─data.table:::`[.data.table`(.df, , `:=`(z = 1), by = "x", keyby = FALSE)
── Error ('test-mutate.R:273:3'): .keep= always retains grouping variables (#5582) ──
Error in ``[.data.table`(~.df, , `:=`(a = x + 1), by = "z", keyby = FALSE)`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-mutate.R:273:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─tidytable::mutate(df, a = x + 1, .keep = "none", .by = z)
5. ├─tidytable:::mutate.tidytable(df, a = x + 1, .keep = "none", .by = z)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─.df[, `:=`(a = x + 1), by = "z", keyby = FALSE]
8. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:344:3'): can use .data and .env with .by ──────────────
Error in ``[.data.table`(~.df, , `:=`(new = mean(x) + .env$x), by = "y", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% mutate(new = mean(.data$x) + .env$x, .by = y) at test-mutate.R:344:3
2. ├─tidytable::mutate(., new = mean(.data$x) + .env$x, .by = y)
3. ├─tidytable:::mutate.data.frame(...)
4. │ ├─tidytable::mutate(...)
5. │ └─tidytable:::mutate.tidytable(...)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─.df[, `:=`(new = mean(x) + .env$x), by = "y", keyby = FALSE]
8. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:380:3'): works on rowwise_tt ──────────────────────────
Error in ``[.data.table`(~.df, , `:=`(row_mean = mean(c(x, y))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% rowwise() %>% mutate(row_mean = mean(c(x, y))) at test-mutate.R:380:3
2. ├─tidytable::mutate(., row_mean = mean(c(x, y)))
3. ├─tidytable:::mutate.rowwise_tt(., row_mean = mean(c(x, y)))
4. │ ├─tidytable::mutate(...)
5. │ └─tidytable:::mutate.tidytable(...)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─.df[, `:=`(row_mean = mean(c(x, y))), by = ".rowwise_id", keyby = FALSE]
8. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:404:3'): c_across does all cols automatically ─────────
Error in ``[.data.table`(~.df, , `:=`(row_mean = mean(vctrs::vec_c(x, y))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% rowwise() %>% mutate(row_mean = mean(c_across())) at test-mutate.R:404:3
2. ├─tidytable::mutate(., row_mean = mean(c_across()))
3. ├─tidytable:::mutate.rowwise_tt(., row_mean = mean(c_across()))
4. │ ├─tidytable::mutate(...)
5. │ └─tidytable:::mutate.tidytable(...)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─...[]
8. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:417:3'): c_across cols selection works ────────────────
Error in ``[.data.table`(~.df, , `:=`(row_mean = mean(vctrs::vec_c(x, y))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─... %>% ungroup() at test-mutate.R:417:3
2. ├─tidytable::ungroup(.)
3. ├─tidytable::mutate(., row_mean = mean(c_across(cols = where(is.numeric))))
4. ├─tidytable:::mutate.rowwise_tt(., row_mean = mean(c_across(cols = where(is.numeric))))
5. │ ├─tidytable::mutate(...)
6. │ └─tidytable:::mutate.tidytable(...)
7. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test-mutate.R:427:3'): c_across works with space named columns ──────
Error in ``[.data.table`(~.df, , `:=`(sum = sum(vctrs::vec_c(`x y`, `x z`))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% rowwise() %>% mutate(sum = sum(c_across(contains(" ")))) at test-mutate.R:427:3
2. ├─tidytable::mutate(., sum = sum(c_across(contains(" "))))
3. ├─tidytable:::mutate.rowwise_tt(., sum = sum(c_across(contains(" "))))
4. │ ├─tidytable::mutate(...)
5. │ └─tidytable:::mutate.tidytable(...)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─...[]
8. └─data.table:::`[.data.table`(...)
── Error ('test-mutate_rowwise.R:4:3'): mutate_rowwise() adds column ───────────
Error in ``[.data.table`(~.df, , `:=`(row_mean = mean(c(x, y))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─test_df %>% mutate_rowwise(row_mean = mean(c(x, y))) at test-mutate_rowwise.R:4:3
2. ├─tidytable::mutate_rowwise(., row_mean = mean(c(x, y)))
3. ├─tidytable:::mutate_rowwise.data.frame(...)
4. │ ├─tidytable::mutate_rowwise(...)
5. │ └─tidytable:::mutate_rowwise.tidytable(...)
6. │ ├─tidytable::mutate(...)
7. │ └─tidytable:::mutate.tidytable(...)
8. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
9. ├─.df[, `:=`(row_mean = mean(c(x, y))), by = ".rowwise_id", keyby = FALSE]
10. └─data.table:::`[.data.table`(...)
── Error ('test-mutate_rowwise.R:23:3'): can use .keep and relocate ────────────
Error in ``[.data.table`(~.df, , `:=`(row_mean = mean(c(x, y))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─test_df %>% ... at test-mutate_rowwise.R:23:3
2. ├─tidytable::mutate_rowwise(...)
3. ├─tidytable:::mutate_rowwise.data.frame(...)
4. │ ├─tidytable::mutate_rowwise(...)
5. │ └─tidytable:::mutate_rowwise.tidytable(...)
6. │ ├─tidytable::mutate(...)
7. │ └─tidytable:::mutate.tidytable(...)
8. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
9. ├─.df[, `:=`(row_mean = mean(c(x, y))), by = ".rowwise_id", keyby = FALSE]
10. └─data.table:::`[.data.table`(...)
── Error ('test-mutate_rowwise.R:35:3'): c_across provides all columns ─────────
Error in ``[.data.table`(~.df, , `:=`(row_mean = mean(vctrs::vec_c(x, y))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─test_df %>% mutate_rowwise(row_mean = mean(c_across())) at test-mutate_rowwise.R:35:3
2. ├─tidytable::mutate_rowwise(., row_mean = mean(c_across()))
3. ├─tidytable:::mutate_rowwise.data.frame(., row_mean = mean(c_across()))
4. │ ├─tidytable::mutate_rowwise(...)
5. │ └─tidytable:::mutate_rowwise.tidytable(...)
6. │ ├─tidytable::mutate(...)
7. │ └─tidytable:::mutate.tidytable(...)
8. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
9. ├─...[]
10. └─data.table:::`[.data.table`(...)
── Error ('test-mutate_rowwise.R:46:3'): c_across cols selection works ─────────
Error in ``[.data.table`(~.df, , `:=`(row_mean = mean(vctrs::vec_c(x, y))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─test_df %>% ... at test-mutate_rowwise.R:46:3
2. ├─tidytable::mutate_rowwise(., row_mean = mean(c_across(cols = where(is.numeric))))
3. ├─tidytable:::mutate_rowwise.data.frame(., row_mean = mean(c_across(cols = where(is.numeric))))
4. │ ├─tidytable::mutate_rowwise(...)
5. │ └─tidytable:::mutate_rowwise.tidytable(...)
6. │ ├─tidytable::mutate(...)
7. │ └─tidytable:::mutate.tidytable(...)
8. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
9. ├─...[]
10. └─data.table:::`[.data.table`(...)
── Error ('test-mutate_rowwise.R:54:3'): c_across works with space named columns ──
Error in ``[.data.table`(~.df, , `:=`(sum = sum(vctrs::vec_c(`x y`, `x z`))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─test_df %>% mutate_rowwise(sum = sum(c_across(contains(" ")))) at test-mutate_rowwise.R:54:3
2. ├─tidytable::mutate_rowwise(., sum = sum(c_across(contains(" "))))
3. ├─tidytable:::mutate_rowwise.data.frame(., sum = sum(c_across(contains(" "))))
4. │ ├─tidytable::mutate_rowwise(...)
5. │ └─tidytable:::mutate_rowwise.tidytable(...)
6. │ ├─tidytable::mutate(...)
7. │ └─tidytable:::mutate.tidytable(...)
8. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
9. ├─...[]
10. └─data.table:::`[.data.table`(...)
── Error ('test-mutate_rowwise.R:63:3'): overrides grouped_tt ──────────────────
Error in ``[.data.table`(~.df, , `:=`(row_mean = mean(c(x, y))), by = ".rowwise_id", keyby = FALSE)`: attempt access index 4/4 in VECTOR_ELT
Backtrace:
▆
1. ├─... %>% suppressWarnings() at test-mutate_rowwise.R:63:3
2. ├─base::suppressWarnings(.)
3. │ └─base::withCallingHandlers(...)
4. ├─tidytable::mutate_rowwise(., row_mean = mean(c(x, y)))
5. ├─tidytable:::mutate_rowwise.grouped_tt(...)
6. │ ├─tidytable::mutate_rowwise(...)
7. │ └─tidytable:::mutate_rowwise.tidytable(...)
8. │ ├─tidytable::mutate(...)
9. │ └─tidytable:::mutate.tidytable(...)
10. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
11. ├─.df[, `:=`(row_mean = mean(c(x, y))), by = ".rowwise_id", keyby = FALSE]
12. └─data.table:::`[.data.table`(...)
── Error ('test-rank.R:20:3'): row_number() works with .by ─────────────────────
Error in ``[.data.table`(~.df, , `:=`(row = seq_len(.N)), by = "x", keyby = FALSE)`: attempt access index 2/2 in VECTOR_ELT
Backtrace:
▆
1. ├─df %>% mutate(row = row_number(), .by = x) at test-rank.R:20:3
2. ├─tidytable::mutate(., row = row_number(), .by = x)
3. ├─tidytable:::mutate.data.frame(., row = row_number(), .by = x)
4. │ ├─tidytable::mutate(...)
5. │ └─tidytable:::mutate.tidytable(...)
6. │ └─rlang::eval_tidy(dt_expr, .df, dt_env)
7. ├─.df[, `:=`(row = seq_len(.N)), by = "x", keyby = FALSE]
8. └─data.table:::`[.data.table`(...)
[ FAIL 24 | WARN 0 | SKIP 0 | PASS 1300 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-windows-x86_64
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.
Health stats visible at Monitor.