Last updated on 2025-12-19 14:50:35 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.3.2 | 15.06 | 449.34 | 464.40 | OK | |
| r-devel-linux-x86_64-debian-gcc | 1.3.2 | 11.76 | 326.05 | 337.81 | OK | |
| r-devel-linux-x86_64-fedora-clang | 1.3.2 | 26.00 | 275.58 | 301.58 | ERROR | |
| r-devel-linux-x86_64-fedora-gcc | 1.3.2 | 25.00 | 277.20 | 302.20 | ERROR | |
| r-devel-windows-x86_64 | 1.3.2 | 18.00 | 456.00 | 474.00 | OK | |
| r-patched-linux-x86_64 | 1.3.2 | 15.97 | 391.85 | 407.82 | OK | |
| r-release-linux-x86_64 | 1.3.2 | 14.31 | 384.52 | 398.83 | OK | |
| r-release-macos-arm64 | 1.3.2 | OK | ||||
| r-release-macos-x86_64 | 1.3.2 | 11.00 | 490.00 | 501.00 | OK | |
| r-release-windows-x86_64 | 1.3.2 | 17.00 | 442.00 | 459.00 | OK | |
| r-oldrel-macos-arm64 | 1.3.2 | OK | ||||
| r-oldrel-macos-x86_64 | 1.3.2 | 12.00 | 552.00 | 564.00 | OK | |
| r-oldrel-windows-x86_64 | 1.3.2 | 24.00 | 615.00 | 639.00 | OK |
Version: 1.3.2
Check: tests
Result: ERROR
Running ‘testthat.R’ [94s/99s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
> # * https://testthat.r-lib.org/articles/special-files.html
>
> library(testthat)
> library(SEQTaRget)
>
> test_check("SEQTaRget")
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-5.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-26.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-44.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-64.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-82.R
Expanding Data...
Saving _problems/test_coefficients-105.R
Expanding Data...
Saving _problems/test_coefficients-125.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-142.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-160.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-178.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_errors-24.R
Non-required columns provided, pruning for efficiency
Pruned
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_hazard-4.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_methods-5.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-8.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-19.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-27.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-35.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-43.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-51.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_multinomial-5.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_multinomial-26.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_multinomial-46.R
Expanding Data...
Saving _problems/test_multinomial-65.R
Expanding Data...
Saving _problems/test_multinomial-82.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_parallel-8.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_parallel-20.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_survival-4.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_survival-12.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_survival-20.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_warnings-6.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_warnings-14.R
[ FAIL 31 | WARN 0 | SKIP 0 | PASS 32 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_coefficients.R:3:3'): ITT ──────────────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_coefficients.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:22:3'): Pre-Expansion Dose-Response ─────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:22:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:40:3'): Post-Expansion Dose-Response ────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:40:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:60:3'): Pre-Expansion Censoring ─────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:60:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:78:3'): Post-Expansion Censoring ────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:78:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:99:3'): Pre-Expansion Excused Censoring ─────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:99:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:118:3'): Post-Expansion Excused Censoring ───────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:118:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:140:3'): Pre-Expansion ITT (Cense 1 - LTFU) ─────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_coefficients.R:140:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:158:3'): Post-Expansion ITT (Cense 1 - LTFU) ────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_coefficients.R:158:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:176:3'): ITT - Multinomial, Treatment Levels 1,2 ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_coefficients.R:176:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_errors.R:21:3'): Early Column Erroring ─────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_errors.R:21:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─SEQTaRget::SEQuential(...)
8. ├─SEQTaRget:::factorize(SEQexpand(params), params)
9. │ └─encodes %in% names(data)
10. └─SEQTaRget:::SEQexpand(params)
11. └─(function() {...
12. ├─...[]
13. └─data.table:::`[.data.table`(...)
── Error ('test_hazard.R:3:3'): Hazard and vcov ────────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_hazard.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_methods.R:2:3'): Output Methods Testing ────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_methods.R:2:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:3:3'): Pre-Expansion Excused Censoring - No excusedOne given ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:14:3'): Pre-Expansion Excused Censoring - No excusedZero given ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:14:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:25:3'): Unweighted Censoring and Dose-Reponse ───────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:25:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:33:3'): ITT - Followup Class ────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_misc.R:33:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:41:3'): ITT - Followup Spline ───────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:41:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:49:3'): Error 107 - followup.include = FALSE failing to create covariates ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:49:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:3:3'): Multinomial ITT ───────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_multinomial.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:23:3'): Multinomial Censoring Pre-Expansion ──────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_multinomial.R:23:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:43:3'): Multinomial Censoring Post-Expansion ─────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_multinomial.R:43:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:61:3'): Multinomial Censoring Excused Pre-Expansion ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_multinomial.R:61:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:78:3'): Multinomial Censoring Excused Post-Expansion ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_multinomial.R:78:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_parallel.R:3:3'): Parallelism, Bootstrapping, Output Class Methods ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_parallel.R:3:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_parallel.R:15:3'): Non-Parallel Bootstrapping ──────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_parallel.R:15:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_survival.R:3:3'): Survival Return ──────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_survival.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_survival.R:11:3'): Bootstrapped Survival ───────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_survival.R:11:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_survival.R:19:3'): Bootstrapped Survival - Percentile ──────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_survival.R:19:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_warnings.R:3:3'): Weighted ITT ─────────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_warnings.R:3:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─SEQTaRget::SEQuential(...)
8. ├─SEQTaRget:::factorize(SEQexpand(params), params)
9. │ └─encodes %in% names(data)
10. └─SEQTaRget:::SEQexpand(params)
11. └─(function() {...
12. ├─...[]
13. └─data.table:::`[.data.table`(...)
── Error ('test_warnings.R:11:3'): Unexcused Excused Censoring ─────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_warnings.R:11:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─SEQTaRget::SEQuential(...)
8. ├─SEQTaRget:::factorize(SEQexpand(params), params)
9. │ └─encodes %in% names(data)
10. └─SEQTaRget:::SEQexpand(params)
11. └─(function() {...
12. ├─...[]
13. └─data.table:::`[.data.table`(...)
[ FAIL 31 | WARN 0 | SKIP 0 | PASS 32 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 1.3.2
Check: tests
Result: ERROR
Running ‘testthat.R’ [87s/102s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
> # * https://testthat.r-lib.org/articles/special-files.html
>
> library(testthat)
> library(SEQTaRget)
>
> test_check("SEQTaRget")
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-5.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-26.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-44.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-64.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-82.R
Expanding Data...
Saving _problems/test_coefficients-105.R
Expanding Data...
Saving _problems/test_coefficients-125.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-142.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-160.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_coefficients-178.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_errors-24.R
Non-required columns provided, pruning for efficiency
Pruned
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_hazard-4.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_methods-5.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-8.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-19.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-27.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-35.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-43.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_misc-51.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_multinomial-5.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_multinomial-26.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_multinomial-46.R
Expanding Data...
Saving _problems/test_multinomial-65.R
Expanding Data...
Saving _problems/test_multinomial-82.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_parallel-8.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_parallel-20.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_survival-4.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_survival-12.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_survival-20.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_warnings-6.R
Non-required columns provided, pruning for efficiency
Pruned
Expanding Data...
Saving _problems/test_warnings-14.R
[ FAIL 31 | WARN 0 | SKIP 0 | PASS 32 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_coefficients.R:3:3'): ITT ──────────────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_coefficients.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:22:3'): Pre-Expansion Dose-Response ─────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:22:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:40:3'): Post-Expansion Dose-Response ────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:40:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:60:3'): Pre-Expansion Censoring ─────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:60:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:78:3'): Post-Expansion Censoring ────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:78:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:99:3'): Pre-Expansion Excused Censoring ─────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:99:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:118:3'): Post-Expansion Excused Censoring ───────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_coefficients.R:118:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:140:3'): Pre-Expansion ITT (Cense 1 - LTFU) ─────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_coefficients.R:140:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:158:3'): Post-Expansion ITT (Cense 1 - LTFU) ────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_coefficients.R:158:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_coefficients.R:176:3'): ITT - Multinomial, Treatment Levels 1,2 ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_coefficients.R:176:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_errors.R:21:3'): Early Column Erroring ─────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_errors.R:21:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─SEQTaRget::SEQuential(...)
8. ├─SEQTaRget:::factorize(SEQexpand(params), params)
9. │ └─encodes %in% names(data)
10. └─SEQTaRget:::SEQexpand(params)
11. └─(function() {...
12. ├─...[]
13. └─data.table:::`[.data.table`(...)
── Error ('test_hazard.R:3:3'): Hazard and vcov ────────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_hazard.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_methods.R:2:3'): Output Methods Testing ────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_methods.R:2:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:3:3'): Pre-Expansion Excused Censoring - No excusedOne given ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:14:3'): Pre-Expansion Excused Censoring - No excusedZero given ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:14:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:25:3'): Unweighted Censoring and Dose-Reponse ───────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:25:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:33:3'): ITT - Followup Class ────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_misc.R:33:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:41:3'): ITT - Followup Spline ───────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:41:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_misc.R:49:3'): Error 107 - followup.include = FALSE failing to create covariates ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_misc.R:49:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:3:3'): Multinomial ITT ───────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_multinomial.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:23:3'): Multinomial Censoring Pre-Expansion ──────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_multinomial.R:23:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:43:3'): Multinomial Censoring Post-Expansion ─────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_multinomial.R:43:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:61:3'): Multinomial Censoring Excused Pre-Expansion ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_multinomial.R:61:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_multinomial.R:78:3'): Multinomial Censoring Excused Post-Expansion ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_multinomial.R:78:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_parallel.R:3:3'): Parallelism, Bootstrapping, Output Class Methods ──
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_parallel.R:3:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_parallel.R:15:3'): Non-Parallel Bootstrapping ──────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test_parallel.R:15:3
2. │ └─base::withCallingHandlers(...)
3. └─SEQTaRget::SEQuential(...)
4. ├─SEQTaRget:::factorize(SEQexpand(params), params)
5. │ └─encodes %in% names(data)
6. └─SEQTaRget:::SEQexpand(params)
7. └─(function() {...
8. ├─...[]
9. └─data.table:::`[.data.table`(...)
── Error ('test_survival.R:3:3'): Survival Return ──────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_survival.R:3:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_survival.R:11:3'): Bootstrapped Survival ───────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_survival.R:11:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_survival.R:19:3'): Bootstrapped Survival - Percentile ──────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. └─SEQTaRget::SEQuential(...) at test_survival.R:19:3
2. ├─SEQTaRget:::factorize(SEQexpand(params), params)
3. │ └─encodes %in% names(data)
4. └─SEQTaRget:::SEQexpand(params)
5. └─(function() {...
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test_warnings.R:3:3'): Weighted ITT ─────────────────────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_warnings.R:3:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─SEQTaRget::SEQuential(...)
8. ├─SEQTaRget:::factorize(SEQexpand(params), params)
9. │ └─encodes %in% names(data)
10. └─SEQTaRget:::SEQexpand(params)
11. └─(function() {...
12. ├─...[]
13. └─data.table:::`[.data.table`(...)
── Error ('test_warnings.R:11:3'): Unexcused Excused Censoring ─────────────────
Error in ``[.data.table`(DT[, list(period = Map(seq, get(params@time), table(DT[[params@id]])[.GRP] - 1)), by = eval(params@id), ][, cbind(.SD, trial = rowid(get(params@id)) - 1)][, list(period = unlist(.SD)), by = c(eval(params@id), "trial")], , `:=`(followup, as.integer(seq_len(.N) - 1)), by = c(eval(params@id), "trial"))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_warnings.R:11:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. └─SEQTaRget::SEQuential(...)
8. ├─SEQTaRget:::factorize(SEQexpand(params), params)
9. │ └─encodes %in% names(data)
10. └─SEQTaRget:::SEQexpand(params)
11. └─(function() {...
12. ├─...[]
13. └─data.table:::`[.data.table`(...)
[ FAIL 31 | WARN 0 | SKIP 0 | PASS 32 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc