Merge pull request #366 from MSDLLCpapers/main

gsDesign/gsDesign2 version update + rpact code update with the most up to date rpact version

Comp/r-east_gsd_tte.qmd

@@ -410,7 +410,9 @@ pval_fut <- pfs_rpact$futilityBoundsPValueScale
 zval_eff <- pfs_rpact_gsd$criticalValues
 zval_fut <- pfs_rpact_gsd$futilityBounds
 pcross_h0_eff <- pfs_rpact_gsd$alphaSpent
-pcross_h0_fut <- as.numeric(summary(pfs_rpact)$summaryItems[[20]]$values[[1]])
+pcross_h0_fut <- summary(pfs_rpact)$summaryItems |>
+  Filter(\(x) x$title == "Exit probability for futility (under H0)", x = _) |>
+  sapply(\(x) as.numeric(x$values))
 
 ia1_eff <- c(zval_eff[1], pval_eff[1], hr_bound_eff[1], pcross_h0_eff[1], pcross_h1_eff[1])
 fa_eff <-  c(zval_eff[2], pval_eff[2], hr_bound_eff[2], pcross_h0_eff[2], pcross_h1_eff[2])
@@ -461,7 +463,6 @@ pfs_rpact_sum |>
 
 ```
 
-
 ```{r}
 sessionInfo()
 ```

renv.lock

@@ -1895,7 +1895,7 @@
     },
     "gsDesign": {
       "Package": "gsDesign",
-      "Version": "3.6.4",
+      "Version": "3.6.5",
       "Source": "Repository",
       "Repository": "CRAN",
       "Requirements": [
@@ -1914,11 +1914,11 @@
         "tools",
         "xtable"
       ],
-      "Hash": "0a3639c9b3a529a6ca0fad4b8f20743b"
+      "Hash": "8e52eb6a565067ff4935617abca6f2c0"
     },
     "gsDesign2": {
       "Package": "gsDesign2",
-      "Version": "1.1.2",
+      "Version": "1.1.3",
       "Source": "Repository",
       "Repository": "CRAN",
       "Requirements": [
@@ -1939,7 +1939,7 @@
         "tidyr",
         "utils"
       ],
-      "Hash": "9cef76f390f33e20c9963202aec94f30"
+      "Hash": "20b0016ee67344768172da125dc68f9f"
     },
     "gt": {
       "Package": "gt",