Last updated on 2025-12-19 14:50:22 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.1.7 | 28.78 | 452.45 | 481.23 | OK | |
| r-devel-linux-x86_64-debian-gcc | 1.1.7 | 19.75 | 268.36 | 288.11 | OK | |
| r-devel-linux-x86_64-fedora-clang | 1.1.7 | 57.00 | OK | |||
| r-devel-linux-x86_64-fedora-gcc | 1.1.7 | 56.00 | 230.48 | 286.48 | ERROR | |
| r-devel-windows-x86_64 | 1.1.7 | 35.00 | 349.00 | 384.00 | OK | |
| r-patched-linux-x86_64 | 1.1.7 | 29.12 | 347.51 | 376.63 | OK | |
| r-release-linux-x86_64 | 1.1.7 | 30.50 | 349.77 | 380.27 | OK | |
| r-release-macos-arm64 | 1.1.7 | 6.00 | 76.00 | 82.00 | OK | |
| r-release-macos-x86_64 | 1.1.7 | 20.00 | 368.00 | 388.00 | OK | |
| r-release-windows-x86_64 | 1.1.7 | 36.00 | 354.00 | 390.00 | OK | |
| r-oldrel-macos-arm64 | 1.1.7 | 6.00 | 83.00 | 89.00 | OK | |
| r-oldrel-macos-x86_64 | 1.1.7 | 21.00 | 397.00 | 418.00 | OK | |
| r-oldrel-windows-x86_64 | 1.1.7 | 47.00 | 472.00 | 519.00 | OK |
Version: 1.1.7
Check: examples
Result: ERROR
Running examples in ‘gsDesign2-Ex.R’ failed
The error most likely occurred in:
> ### Name: ahr
> ### Title: Average hazard ratio under non-proportional hazards
> ### Aliases: ahr
>
> ### ** Examples
>
> # Example 1: default
> ahr()
Error in `[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time)) :
attempt access index 6/6 in VECTOR_ELT
Calls: ahr -> pw_info -> [ -> [.data.table
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 1.1.7
Check: tests
Result: ERROR
Running ‘testthat.R’ [66s/95s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(gsDesign2)
>
> test_check("gsDesign2")
Saving _problems/test-developer-ahr-20.R
Saving _problems/test-developer-ahr-56.R
Saving _problems/test-developer-ahr-89.R
Saving _problems/test-developer-as_gt-7.R
Saving _problems/test-developer-expected_time-19.R
Saving _problems/test-developer-expected_time-26.R
Saving _problems/test-developer-expected_time-47.R
Saving _problems/test-developer-gs_bound_summary-3.R
Saving _problems/test-developer-gs_bound_summary-19.R
Saving _problems/test-developer-gs_bound_summary-32.R
Saving _problems/test-developer-gs_bound_summary-45.R
Saving _problems/test-developer-gs_bound_summary-86.R
Saving _problems/test-developer-gs_bound_summary-95.R
Saving _problems/test-developer-gs_bound_summary-105.R
Saving _problems/test-developer-gs_bound_summary-119.R
Saving _problems/test-developer-gs_bound_summary-130.R
Saving _problems/test-developer-gs_bound_summary-144.R
Saving _problems/test-developer-gs_bound_summary-166.R
Saving _problems/test-developer-gs_bound_summary-176.R
Saving _problems/test-developer-gs_cp_npe-45.R
Saving _problems/test-developer-gs_design_ahr-2.R
Saving _problems/test-developer-gs_design_ahr-15.R
Saving _problems/test-developer-gs_design_ahr-28.R
Saving _problems/test-developer-gs_design_ahr-43.R
Saving _problems/test-developer-gs_design_ahr-58.R
Saving _problems/test-developer-gs_design_ahr-73.R
Saving _problems/test-developer-gs_design_ahr-95.R
Saving _problems/test-developer-gs_design_ahr-124.R
Saving _problems/test-developer-gs_design_wlr-20.R
Saving _problems/test-developer-gs_design_wlr-35.R
Saving _problems/test-developer-gs_design_wlr-49.R
Saving _problems/test-developer-gs_design_wlr-73.R
Saving _problems/test-developer-gs_design_wlr-97.R
Saving _problems/test-developer-gs_design_wlr-128.R
Saving _problems/test-developer-gs_design_wlr-182.R
Saving _problems/test-developer-gs_design_wlr-236.R
Saving _problems/test-developer-gs_info_wlr-14.R
Saving _problems/test-developer-gs_power_ahr-2.R
Saving _problems/test-developer-gs_power_ahr-23.R
Saving _problems/test-developer-gs_power_ahr-60.R
Saving _problems/test-developer-gs_power_ahr-97.R
Saving _problems/test-developer-gs_power_ahr-130.R
Saving _problems/test-developer-gs_power_ahr-149.R
Saving _problems/test-developer-gs_power_wlr-8.R
Saving _problems/test-developer-pw_info-11.R
Saving _problems/test-developer-pw_info-46.R
Saving _problems/test-developer-pw_info-73.R
Saving _problems/test-developer-pw_info-113.R
Saving _problems/test-developer-pw_info-124.R
Saving _problems/test-developer-summary-5.R
Saving _problems/test-developer-summary-68.R
Saving _problems/test-developer-summary-126.R
Saving _problems/test-developer-summary-162.R
Saving _problems/test-developer-summary-172.R
Saving _problems/test-developer-summary-243.R
Saving _problems/test-developer-to_integer-13.R
Saving _problems/test-developer-to_integer-50.R
Saving _problems/test-developer-to_integer-57.R
Saving _problems/test-developer-to_integer-90.R
Saving _problems/test-developer-to_integer-192.R
Saving _problems/test-developer-to_integer-210.R
Saving _problems/test-developer-to_integer-259.R
Saving _problems/test-developer-to_integer-277.R
Saving _problems/test-developer-to_integer-285.R
Saving _problems/test-independent-ahr-35.R
Saving _problems/test-independent-ahr-52.R
Saving _problems/test-independent-ahr-69.R
Saving _problems/test-independent-ahr-82.R
Saving _problems/test-independent-expected_time-2.R
Saving _problems/test-independent-expected_time-18.R
Saving _problems/test-independent-fixed_design-29.R
Saving _problems/test-independent-fixed_design-53.R
Saving _problems/test-independent-fixed_design-79.R
Saving _problems/test-independent-fixed_design-103.R
Saving _problems/test-independent-fixed_design-128.R
Saving _problems/test-independent-gs_design_ahr-21.R
Saving _problems/test-independent-gs_design_ahr-67.R
Saving _problems/test-independent-gs_design_combo-1.R
Saving _problems/test-independent-gs_info_ahr-20.R
Saving _problems/test-independent-gs_info_ahr-29.R
Saving _problems/test-independent-gs_info_ahr-61.R
Saving _problems/test-independent-gs_info_combo-25.R
Saving _problems/test-independent-gs_power_ahr-63.R
Saving _problems/test-independent-gs_power_ahr-94.R
Saving _problems/test-independent-gs_power_combo-37.R
Saving _problems/test-independent-gs_power_combo-113.R
Saving _problems/test-independent-gs_update_ahr-43.R
Saving _problems/test-independent-to_integer-67.R
Saving _problems/test-independent-to_integer-87.R
Saving _problems/test-independent-to_integer-97.R
Saving _problems/test-independent-to_integer-118.R
Saving _problems/test-independent-to_integer-140.R
Saving _problems/test-independent-to_integer-187.R
Saving _problems/test-independent-to_integer-205.R
Saving _problems/test-independent-utility_combo-157.R
Saving _problems/test-independent-utility_combo-463.R
Saving _problems/test-independent-utility_combo-547.R
Saving _problems/test-independent_gs_design_wlr-46.R
Saving _problems/test-independent_gs_info_wlr-42.R
Saving _problems/test-independent_gs_power_wlr-43.R
[ FAIL 100 | WARN 0 | SKIP 28 | PASS 274 ]
══ Skipped tests (28) ══════════════════════════════════════════════════════════
• On CRAN (28): 'test-independent_as_gt.R:35:3',
'test-independent_as_gt.R:60:3', 'test-independent_as_gt.R:85:3',
'test-independent_as_gt.R:114:3', 'test-independent_as_gt.R:125:3',
'test-independent_as_gt.R:136:3', 'test-independent_as_gt.R:147:3',
'test-independent_as_gt.R:169:3', 'test-independent_as_gt.R:194:3',
'test-independent_as_gt.R:205:3', 'test-independent_as_gt.R:216:3',
'test-independent_as_gt.R:227:3', 'test-independent_as_gt.R:241:3',
'test-independent_as_gt.R:263:3', 'test-independent_as_gt.R:274:3',
'test-independent_as_rtf.R:2:3', 'test-independent_as_rtf.R:14:3',
'test-independent_as_rtf.R:29:3', 'test-independent_as_rtf.R:44:3',
'test-independent_as_rtf.R:56:3', 'test-independent_as_rtf.R:68:3',
'test-independent_as_rtf.R:80:3', 'test-independent_as_rtf.R:92:3',
'test-independent_as_rtf.R:108:3', 'test-independent_as_rtf.R:124:3',
'test-independent_as_rtf.R:148:3', 'test-independent_as_rtf.R:163:3',
'test-independent_as_rtf.R:175:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-developer-ahr.R:16:3'): unstratified population, compared with old version ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::ahr(...) at test-developer-ahr.R:16:3
2. └─gsDesign2::pw_info(...)
3. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
4. └─data.table:::`[.data.table`(...)
── Error ('test-developer-ahr.R:52:3'): stratified population, compared with old version ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::ahr(...) at test-developer-ahr.R:52:3
2. └─gsDesign2::pw_info(...)
3. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
4. └─data.table:::`[.data.table`(...)
── Error ('test-developer-ahr.R:89:3'): stratified population, compared with pw_info ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::ahr(...) at test-developer-ahr.R:89:3
2. └─gsDesign2::pw_info(...)
3. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
4. └─data.table:::`[.data.table`(...)
── Error ('test-developer-as_gt.R:4:3'): footnote=FALSE removes footnote ───────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::fixed_design_ahr(...) at test-developer-as_gt.R:4:3
2. └─gsDesign2::gs_power_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-developer-expected_time.R:14:3'): time to targeted events ──────
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2::expected_time(...) at test-developer-expected_time.R:14:3
2. └─base::tryCatch(...)
3. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
4. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
5. └─value[[3L]](cond)
── Error ('test-developer-expected_time.R:26:3'): default ──────────────────────
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2::expected_time(enroll_rate = enroll_rate) at test-developer-expected_time.R:26:3
2. └─base::tryCatch(...)
3. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
4. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
5. └─value[[3L]](cond)
── Error ('test-developer-expected_time.R:42:3'): time to targeted events by new/old version ──
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2::expected_time(...) at test-developer-expected_time.R:42:3
2. └─base::tryCatch(...)
3. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
4. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
5. └─value[[3L]](cond)
── Error ('test-developer-gs_bound_summary.R:3:3'): gs_bound_summary() summarizes the correct number of analyses ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_bound_summary.R:3:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:19:3'): gs_bound_summary() uses correct HR label ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_bound_summary.R:19:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:32:3'): gs_bound_summary() uses correct column names ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_bound_summary.R:32:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:45:3'): gs_bound_summary() supports multiple alpha values ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(analysis_time = 1:3 * 12, alpha = 0.0125) at test-developer-gs_bound_summary.R:45:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:86:3'): The arg `alpha` is only supported for AHR design objects ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-developer-gs_bound_summary.R:86:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:95:3'): The arg `alpha` is required to be a numeric vector ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_bound_summary.R:95:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:105:3'): Edge case: when arg `alpha` matches original alpha ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(analysis_time = 1:3 * 12, alpha = 0.0125) at test-developer-gs_bound_summary.R:105:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:119:3'): One-sided design should not have column Futility ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_bound_summary.R:119:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:130:3'): Arg `digits` controls number of digits in table body ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_bound_summary.R:130:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:144:3'): Arg `ddigits` controls number of digits for delta value ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(info_frac = 1:3/3) at test-developer-gs_bound_summary.R:144:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:166:3'): Arg `tdigits` controls number of digits for estimated timing ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(info_frac = 1:3/3) at test-developer-gs_bound_summary.R:166:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_bound_summary.R:176:3'): Arg `timename` controls time unit label ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_bound_summary.R:176:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_cp_npe.R:36:3'): Compare the gs_cp_npe with gsDesign::gsCP ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-developer-gs_cp_npe.R:36:3
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_ahr.R:2:3'): Call with defaults ────────────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr() at test-developer-gs_design_ahr.R:2:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_ahr.R:15:3'): Single analysis ──────────────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(analysis_time = 40) at test-developer-gs_design_ahr.R:15:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_ahr.R:28:3'): Multiple analysisTimes ───────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(analysis_time = c(12, 24, 36)) at test-developer-gs_design_ahr.R:28:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_ahr.R:43:3'): Specified information fraction ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(info_frac = c(0.25, 0.75, 1), analysis_time = 36) at test-developer-gs_design_ahr.R:43:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_ahr.R:58:3'): Multiple analysis times & IF and driven by times ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_design_ahr.R:58:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_ahr.R:73:3'): Multiple analysis times & IF and driven by IF ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_design_ahr.R:73:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_ahr.R:88:3'): 2-sided symmetric design with O'Brien-Fleming spending ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_design_ahr.R:88:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_ahr.R:117:3'): Pocock lower spending under H1 (NPH) ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_design_ahr.R:117:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_wlr.R:16:3'): Validate info-frac driven design with a known study duration ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-developer-gs_design_wlr.R:16:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_wlr.R:31:3'): Validate calendar-time driven design ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-developer-gs_design_wlr.R:31:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_wlr.R:45:3'): Validate calendar-time and info-frac driven design -- A ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-developer-gs_design_wlr.R:45:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_wlr.R:69:3'): Validate calendar-time and info-frac driven design -- B ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-developer-gs_design_wlr.R:69:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_wlr.R:93:3'): Validate calendar-time and info-frac driven design -- C ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-developer-gs_design_wlr.R:93:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_wlr.R:114:3'): Validate if the output info-frac match the planned info-frac, when the design is only driven by info frac ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-developer-gs_design_wlr.R:114:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_wlr.R:168:3'): Validate if the output info-frac match the planned info-frac, when the design is driven by both info frac and analysis time ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-developer-gs_design_wlr.R:168:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_design_wlr.R:222:3'): Validate if WLR design under logrank test generates similar design as in AHR ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-gs_design_wlr.R:222:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_info_wlr.R:10:3'): statistcial information of WLR under logrank test is approximately same as that from AHR ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_info_ahr(...) at test-developer-gs_info_wlr.R:10:3
2. ├─dplyr::select(...)
3. └─gsDesign2::ahr(...)
4. └─gsDesign2::pw_info(...)
5. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
6. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_power_ahr.R:2:3'): default parameter ──────────────
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2::gs_power_ahr(lpar = list(sf = gsDesign::sfLDOF, total_spend = 0.1)) at test-developer-gs_power_ahr.R:2:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─base::rbind(...)
4. └─gsDesign2::expected_time(...)
5. └─base::tryCatch(...)
6. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
7. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
8. └─value[[3L]](cond)
── Error ('test-developer-gs_power_ahr.R:15:3'): calendar based cut ────────────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_power_ahr(...) at test-developer-gs_power_ahr.R:15:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_power_ahr.R:52:3'): event based cut ───────────────
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2::gs_power_ahr(...) at test-developer-gs_power_ahr.R:52:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─base::rbind(...)
4. └─gsDesign2::expected_time(...)
5. └─base::tryCatch(...)
6. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
7. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
8. └─value[[3L]](cond)
── Error ('test-developer-gs_power_ahr.R:89:3'): calendar + event based cut ────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_power_ahr(...) at test-developer-gs_power_ahr.R:89:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_power_ahr.R:128:3'): Use default lower and lpar but set test_lower is FALSE ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_power_ahr(...) at test-developer-gs_power_ahr.R:128:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_power_ahr.R:143:3'): Validate the boundary is symmetric in symmetric designs. ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-developer-gs_power_ahr.R:143:3
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-developer-gs_power_wlr.R:2:3'): Validate 2-sided symetric design ──
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2::gs_power_wlr(...) at test-developer-gs_power_wlr.R:2:3
2. └─gsDesign2::gs_info_wlr(...)
3. ├─base::rbind(...)
4. └─gsDesign2::expected_time(...)
5. └─base::tryCatch(...)
6. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
7. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
8. └─value[[3L]](cond)
── Error ('test-developer-pw_info.R:9:3'): Output column of n matches with expected_accrual with Inf in the fail_rate ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::pw_info(...) at test-developer-pw_info.R:9:3
2. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
3. └─data.table:::`[.data.table`(...)
── Error ('test-developer-pw_info.R:44:3'): Output column of n matches with expected_accrual without Inf in the fail_rate ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::pw_info(...) at test-developer-pw_info.R:44:3
2. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
3. └─data.table:::`[.data.table`(...)
── Error ('test-developer-pw_info.R:73:3'): Column order is consistent ─────────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─base::colnames(pw_info()) at test-developer-pw_info.R:73:3
2. │ └─base::is.data.frame(x)
3. └─gsDesign2::pw_info()
4. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
5. └─data.table:::`[.data.table`(...)
── Failure ('test-developer-pw_info.R:108:3'): When there are many pieces of HRs ──
Expected `pw_info(...)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
── Error ('test-developer-pw_info.R:117:3'): When control median changes but HR remain unchanged ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::pw_info(...) at test-developer-pw_info.R:117:3
2. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
3. └─data.table:::`[.data.table`(...)
── Error ('test-developer-summary.R:5:3'): summary.gs_design() accepts same-length vectors for analysis_vars and analysis_decimals ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(analysis_time = c(12, 24)) at test-developer-summary.R:5:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-summary.R:68:3'): summary.gs_design() accepts a named vector for analysis_decimals ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(analysis_time = c(12, 24)) at test-developer-summary.R:68:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-summary.R:126:3'): The column 'Bound' is always included in summary.gs_design() output ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr() at test-developer-summary.R:126:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-summary.R:155:3'): The full alpha is correctly carried over ──
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2::gs_power_ahr(...) at test-developer-summary.R:155:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─base::rbind(...)
4. └─gsDesign2::expected_time(...)
5. └─base::tryCatch(...)
6. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
7. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
8. └─value[[3L]](cond)
── Error ('test-developer-summary.R:172:3'): summary.gs_design() accepts same-length vectors for col_vars and col_decimals ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr() at test-developer-summary.R:172:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-summary.R:243:3'): summary.gs_design() accepts a named vector for col_decimals ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr() at test-developer-summary.R:243:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-to_integer.R:2:3'): The IA nominal p-value is the same as the IA alpha spending. ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-developer-to_integer.R:2:3
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-developer-to_integer.R:33:3'): The statistcial information under null equals to event/4 udner equal randomization. ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-developer-to_integer.R:33:3
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-developer-to_integer.R:57:3'): Validate the sample size rounding under equal randomization (1:1) for TTE endpoint. -- GSD ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(analysis_time = c(24, 36)) at test-developer-to_integer.R:57:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-to_integer.R:87:3'): Validate the sample size rounding under unequal randomization (3:2) for TTE endpoint. -- GSD ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-developer-to_integer.R:87:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-to_integer.R:187:3'): Validate the sample size rounding under equal randomization (1:1) for TTE endpoint -- fixed design. ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::fixed_design_ahr(...) at test-developer-to_integer.R:187:3
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-developer-to_integer.R:205:3'): Validate the sample size rounding under unequal randomization (3:2) for TTE endpoint. ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::fixed_design_ahr(...) at test-developer-to_integer.R:205:3
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-developer-to_integer.R:253:3'): Validate the boundary is symmetric in symmetric designs. ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-developer-to_integer.R:253:3
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-developer-to_integer.R:266:3'): verify the crossing prob of a MB design at IA1 under null ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-developer-to_integer.R:266:3
2. └─gsDesign2::gs_power_wlr(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-developer-to_integer.R:285:5'): The attribute `uninteger_is_from` matches the input design object ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(get(design_func)()) at test-developer-to_integer.R:285:5
2. └─get(design_func)()
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-independent-ahr.R:31:3'): AHR results are consistent with simulation results for single stratum and multiple cutoff ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::ahr(...) at test-independent-ahr.R:31:3
2. └─gsDesign2::pw_info(...)
3. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
4. └─data.table:::`[.data.table`(...)
── Error ('test-independent-ahr.R:48:3'): AHR results are consistent with simulation results for single stratum and single cutoff ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::ahr(...) at test-independent-ahr.R:48:3
2. └─gsDesign2::pw_info(...)
3. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
4. └─data.table:::`[.data.table`(...)
── Error ('test-independent-ahr.R:65:3'): AHR results are consistent with simulation results for single stratum and multiple cutoff ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::ahr(...) at test-independent-ahr.R:65:3
2. └─gsDesign2::pw_info(...)
3. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
4. └─data.table:::`[.data.table`(...)
── Error ('test-independent-ahr.R:76:3'): The sample size returned from the ahr() function is correct ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::ahr(...) at test-independent-ahr.R:76:3
2. └─gsDesign2::pw_info(...)
3. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
4. └─data.table:::`[.data.table`(...)
── Error ('test-independent-expected_time.R:2:3'): expected_time equal to test_event result ──
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2:::test_expected_time() at test-independent-expected_time.R:2:3
2. └─gsDesign2::expected_time(...) at ./helper-double-programming-expected_time.R:19:3
3. └─base::tryCatch(...)
4. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
5. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
6. └─value[[3L]](cond)
── Error ('test-independent-expected_time.R:18:3'): expected_time euqal to AHR's result ──
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2:::test_expected_time() at test-independent-expected_time.R:18:3
2. └─gsDesign2::expected_time(...) at ./helper-double-programming-expected_time.R:19:3
3. └─base::tryCatch(...)
4. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
5. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
6. └─value[[3L]](cond)
── Error ('test-independent-fixed_design.R:22:3'): AHR ─────────────────────────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::fixed_design_ahr(...) at test-independent-fixed_design.R:22:3
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-independent-fixed_design.R:44:3'): FH ──────────────────────────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-independent-fixed_design.R:44:3
2. └─gsDesign2::fixed_design_fh(...)
3. └─gsDesign2::gs_design_wlr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::gs_info_wlr(...)
6. └─gsDesign2::ahr(...)
7. └─gsDesign2::pw_info(...)
8. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
9. └─data.table:::`[.data.table`(...)
── Error ('test-independent-fixed_design.R:71:3'): MB ──────────────────────────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-independent-fixed_design.R:71:3
2. └─gsDesign2::fixed_design_mb(...)
3. └─gsDesign2::gs_design_wlr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::gs_info_wlr(...)
6. └─gsDesign2::ahr(...)
7. └─gsDesign2::pw_info(...)
8. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
9. └─data.table:::`[.data.table`(...)
── Error ('test-independent-fixed_design.R:96:3'): LF ──────────────────────────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-independent-fixed_design.R:96:3
2. └─gsDesign2::fixed_design_lf(...)
3. └─gsDesign2::ahr(...)
4. └─gsDesign2::pw_info(...)
5. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
6. └─data.table:::`[.data.table`(...)
── Error ('test-independent-fixed_design.R:118:3'): MaxCombo ───────────────────
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::fixed_design_maxcombo(...) at test-independent-fixed_design.R:118:3
2. └─gsDesign2::gs_design_combo(...)
3. └─gsDesign2:::gs_utility_combo(...)
4. └─gsDesign2::gs_info_combo(...)
5. └─base::lapply(...)
6. └─gsDesign2 (local) FUN(X[[i]], ...)
7. └─gsDesign2::gs_info_wlr(...)
8. └─gsDesign2::ahr(...)
9. └─gsDesign2::pw_info(...)
10. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
11. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_design_ahr.R:17:3'): compare results with AHR in the situation of single analysis ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-independent-gs_design_ahr.R:17:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_design_ahr.R:63:3'): compare results with gsDesign2::AHR in the situation with IF and multiple analysis times specified ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-independent-gs_design_ahr.R:63:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_design_combo.R:1:1'): (code run outside of `test_that()`) ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2:::test_gs_design_combo() at test-independent-gs_design_combo.R:1:1
2. └─gsDesign2::gs_design_combo(...) at ./helper-double-programming-gs_design_combo.R:62:3
3. └─gsDesign2:::gs_utility_combo(...)
4. └─gsDesign2::gs_info_combo(...)
5. └─base::lapply(...)
6. └─gsDesign2 (local) FUN(X[[i]], ...)
7. └─gsDesign2::gs_info_wlr(...)
8. └─gsDesign2::ahr(...)
9. └─gsDesign2::pw_info(...)
10. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
11. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_info_ahr.R:9:3'): results match if only put in targeted analysis times ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-independent-gs_info_ahr.R:9:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─dplyr::select(...)
5. └─gsDesign2::gs_info_ahr(...)
6. ├─dplyr::select(...)
7. └─gsDesign2::ahr(...)
8. └─gsDesign2::pw_info(...)
9. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
10. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_info_ahr.R:29:3'): results match if only put in targeted events ──
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2::gs_info_ahr(...) at test-independent-gs_info_ahr.R:29:3
2. ├─base::rbind(...)
3. └─gsDesign2::expected_time(...)
4. └─base::tryCatch(...)
5. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
6. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
7. └─value[[3L]](cond)
── Error ('test-independent-gs_info_ahr.R:56:3'): results match if put in both analysis time and targeted events ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_info_ahr(...) at test-independent-gs_info_ahr.R:56:3
2. ├─dplyr::select(...)
3. └─gsDesign2::ahr(...)
4. └─gsDesign2::pw_info(...)
5. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
6. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_info_combo.R:15:3'): gs_info_combo correctly use gs_info_wlr 1 ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_info_combo(...) at test-independent-gs_info_combo.R:15:3
2. └─base::lapply(...)
3. └─gsDesign2 (local) FUN(X[[i]], ...)
4. └─gsDesign2::gs_info_wlr(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_power_ahr.R:41:3'): under same number of events, compare the power ──
Error in `value[[3L]](cond)`: solution not found (attempt access index 6/6 in VECTOR_ELT)
Backtrace:
▆
1. └─gsDesign2::gs_power_ahr(...) at test-independent-gs_power_ahr.R:41:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─base::rbind(...)
4. └─gsDesign2::expected_time(...)
5. └─base::tryCatch(...)
6. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
7. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
8. └─value[[3L]](cond)
── Error ('test-independent-gs_power_ahr.R:71:3'): under same power setting, compare the number of events ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_power_ahr(...) at test-independent-gs_power_ahr.R:71:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_power_combo.R:31:3'): calculate analysis number as planned ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_power_combo(...) at test-independent-gs_power_combo.R:31:3
2. └─gsDesign2:::gs_utility_combo(...)
3. └─gsDesign2::gs_info_combo(...)
4. └─base::lapply(...)
5. └─gsDesign2 (local) FUN(X[[i]], ...)
6. └─gsDesign2::gs_info_wlr(...)
7. └─gsDesign2::ahr(...)
8. └─gsDesign2::pw_info(...)
9. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
10. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_power_combo.R:113:3'): arguments are passed via ... to mvtnorm::pmvnorm() ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_power_combo(seed = 1) at test-independent-gs_power_combo.R:113:3
2. └─gsDesign2:::gs_utility_combo(...)
3. └─gsDesign2::gs_info_combo(...)
4. └─base::lapply(...)
5. └─gsDesign2 (local) FUN(X[[i]], ...)
6. └─gsDesign2::gs_info_wlr(...)
7. └─gsDesign2::ahr(...)
8. └─gsDesign2::pw_info(...)
9. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
10. └─data.table:::`[.data.table`(...)
── Error ('test-independent-gs_update_ahr.R:33:1'): (code run outside of `test_that()`) ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(...) at test-independent-gs_update_ahr.R:33:1
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-independent-to_integer.R:67:5'): to_integer works correctly for different fixed design types ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─gsDesign2::to_integer(create_fixed_design(design$fn, design$extra_args)) at test-independent-to_integer.R:67:5
2. └─gsDesign2 (local) create_fixed_design(design$fn, design$extra_args)
3. ├─base::do.call(design_fn, args) at test-independent-to_integer.R:18:3
4. └─gsDesign2 (local) `<fn>`(...)
5. └─gsDesign2::gs_design_ahr(...)
6. └─gsDesign2::gs_info_ahr(...)
7. ├─dplyr::select(...)
8. └─gsDesign2::ahr(...)
9. └─gsDesign2::pw_info(...)
10. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
11. └─data.table:::`[.data.table`(...)
── Failure ('test-independent-to_integer.R:79:3'): fixed_design_ahr handles invalid inputs ──
`fixed_design_ahr(...)` threw an error with unexpected message.
Expected match: "`alpha` and `beta` values must satisfy 0 < alpha < 1 - beta < 1!"
Actual message: "attempt access index 6/6 in VECTOR_ELT"
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-independent-to_integer.R:79:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─gsDesign2::fixed_design_ahr(...)
7. └─gsDesign2::gs_design_ahr(...)
8. └─gsDesign2::gs_info_ahr(...)
9. ├─dplyr::select(...)
10. └─gsDesign2::ahr(...)
11. └─gsDesign2::pw_info(...)
12. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
13. └─data.table:::`[.data.table`(...)
── Failure ('test-independent-to_integer.R:89:3'): fixed_design_ahr handles invalid inputs ──
`fixed_design_ahr(...)` threw an error with unexpected message.
Expected match: "`alpha` and `beta` values must satisfy 0 < alpha < 1 - beta < 1!"
Actual message: "attempt access index 6/6 in VECTOR_ELT"
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-independent-to_integer.R:89:3
2. │ └─testthat:::quasi_capture(...)
3. │ ├─testthat (local) .capture(...)
4. │ │ └─base::withCallingHandlers(...)
5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
6. └─gsDesign2::fixed_design_ahr(...)
7. └─gsDesign2::gs_design_ahr(...)
8. └─gsDesign2::gs_info_ahr(...)
9. ├─dplyr::select(...)
10. └─gsDesign2::ahr(...)
11. └─gsDesign2::pw_info(...)
12. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
13. └─data.table:::`[.data.table`(...)
── Error ('test-independent-to_integer.R:112:3'): to_integer.gs_design rounds events and sample sizes correctly for AHR ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-independent-to_integer.R:112:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-independent-to_integer.R:134:3'): to_integer.gs_design handles WLR correctly ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-independent-to_integer.R:134:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-independent-to_integer.R:178:3'): to_integer.gs_design handles calendar-based spending correctly ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-independent-to_integer.R:178:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-independent-to_integer.R:199:3'): to_integer.gs_design performs correctly with large sample sizes ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_ahr(...) at test-independent-to_integer.R:199:3
2. └─gsDesign2::gs_info_ahr(...)
3. ├─dplyr::select(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-independent-utility_combo.R:147:3'): gs_info_combo correctly use gs_info_wlr 1 ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2:::gs_info_combo(...) at test-independent-utility_combo.R:147:3
2. └─base::lapply(...)
3. └─gsDesign2 (local) FUN(X[[i]], ...)
4. └─gsDesign2::gs_info_wlr(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
── Error ('test-independent-utility_combo.R:457:3'): gs_utility_combo output correct info as gs_info_combo ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2:::gs_utility_combo(...) at test-independent-utility_combo.R:457:3
2. └─gsDesign2::gs_info_combo(...)
3. └─base::lapply(...)
4. └─gsDesign2 (local) FUN(X[[i]], ...)
5. └─gsDesign2::gs_info_wlr(...)
6. └─gsDesign2::ahr(...)
7. └─gsDesign2::pw_info(...)
8. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
9. └─data.table:::`[.data.table`(...)
── Error ('test-independent-utility_combo.R:541:3'): gs_utility_combo output correct info as gs_info_combo ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2:::gs_utility_combo(...) at test-independent-utility_combo.R:541:3
2. └─gsDesign2::gs_info_combo(...)
3. └─base::lapply(...)
4. └─gsDesign2 (local) FUN(X[[i]], ...)
5. └─gsDesign2::gs_info_wlr(...)
6. └─gsDesign2::ahr(...)
7. └─gsDesign2::pw_info(...)
8. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
9. └─data.table:::`[.data.table`(...)
── Error ('test-independent_gs_design_wlr.R:37:3'): Validate the function based on examples with simulation results ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_design_wlr(...) at test-independent_gs_design_wlr.R:37:3
2. ├─dplyr::select(...)
3. └─gsDesign2::gs_info_wlr(...)
4. └─gsDesign2::ahr(...)
5. └─gsDesign2::pw_info(...)
6. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-independent_gs_info_wlr.R:38:3'): Validate the function based on examples with individual functions ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_info_wlr(...) at test-independent_gs_info_wlr.R:38:3
2. └─gsDesign2::ahr(...)
3. └─gsDesign2::pw_info(...)
4. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
5. └─data.table:::`[.data.table`(...)
── Error ('test-independent_gs_power_wlr.R:37:3'): Check using gs_info_wlr and gs_power_npe ──
Error in ``[.data.table`(tbl_event, , `:=`(info0, event * q_c * q_e), by = .(time))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─gsDesign2::gs_info_wlr(...) at test-independent_gs_power_wlr.R:37:3
2. └─gsDesign2::ahr(...)
3. └─gsDesign2::pw_info(...)
4. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
5. └─data.table:::`[.data.table`(...)
[ FAIL 100 | WARN 0 | SKIP 28 | PASS 274 ]
Deleting unused snapshots: 'independent_as_rtf/fixed_design_ahr.rtf',
'independent_as_rtf/fixed_design_ahr_footnote.rtf',
'independent_as_rtf/fixed_design_ahr_title.rtf',
'independent_as_rtf/gs_design_ahr.rtf', 'independent_as_rtf/gs_design_rd.rtf',
'independent_as_rtf/gs_design_wlr.rtf', 'independent_as_rtf/gs_power_wlr.rtf',
'independent_as_rtf/gs_power_wlr_cols_display.rtf',
'independent_as_rtf/gs_power_wlr_efficacy_bound.rtf',
'independent_as_rtf/gs_power_wlr_footnote.rtf',
'independent_as_rtf/gs_power_wlr_futility_bound.rtf',
'independent_as_rtf/gs_power_wlr_spanner.rtf', and
'independent_as_rtf/gs_power_wlr_title.rtf'
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 1.1.7
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
--- re-building ‘gsDesign2.Rmd’ using rmarkdown
Quitting from gsDesign2.Rmd:123-133 [unnamed-chunk-5]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<error/rlang_error>
Error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
---
Backtrace:
▆
1. └─gsDesign2::fixed_design_ahr(...)
2. └─gsDesign2::gs_design_ahr(...)
3. └─gsDesign2::gs_info_ahr(...)
4. ├─dplyr::select(...)
5. └─gsDesign2::ahr(...)
6. └─gsDesign2::pw_info(...)
7. ├─tbl_event[, `:=`(info0, event * q_c * q_e), by = .(time)]
8. └─data.table:::`[.data.table`(...)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'gsDesign2.Rmd' failed with diagnostics:
attempt access index 6/6 in VECTOR_ELT
--- failed re-building ‘gsDesign2.Rmd’
SUMMARY: processing the following file failed:
‘gsDesign2.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc