Last updated on 2025-12-28 01:48:40 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.1.7 | 28.24 | 460.19 | 488.43 | OK | |
| r-devel-linux-x86_64-debian-gcc | 1.1.7 | 20.44 | 276.72 | 297.16 | OK | |
| r-devel-linux-x86_64-fedora-clang | 1.1.7 | 59.00 | 666.46 | 725.46 | OK | |
| r-devel-linux-x86_64-fedora-gcc | 1.1.7 | 57.00 | 574.45 | 631.45 | OK | |
| r-devel-windows-x86_64 | 1.1.7 | 36.00 | 166.00 | 202.00 | ERROR | |
| r-patched-linux-x86_64 | 1.1.7 | 29.00 | 348.10 | 377.10 | OK | |
| r-release-linux-x86_64 | 1.1.7 | 28.63 | 351.03 | 379.66 | 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 | 33.00 | 348.00 | 381.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 | 44.00 | 470.00 | 514.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-windows-x86_64
Version: 1.1.7
Check: tests
Result: ERROR
Running 'testthat.R' [38s]
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-windows-x86_64
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-windows-x86_64
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.
Health stats visible at Monitor.