Merge pull request #465 from yihui/summary-followup

Follow-up on cleaning up `summary()` functions
Merck · Sep 6, 2024 · 6161b56 · 6161b56
2 parents 60d6e9a + 9f43d60
commit 6161b56
Show file tree

Hide file tree

Showing 12 changed files with 63 additions and 67 deletions.
diff --git a/R/summary.R b/R/summary.R
@@ -98,9 +98,8 @@ summary.fixed_design <- function(object, ...) {
     ), fixed = TRUE)
   )
 
-  # capitalize names with special case of Event -> Events
-  ans <- replace_names(ans, c(event = "Events")) %>% cap_names()
-
+  # capitalize names
+  ans <- cap_names(ans)
   ans <- add_class(ans, "fixed_design", x$design)
   return(ans)
 }
@@ -330,10 +329,6 @@ summary.gs_design <- function(object,
   # If the method is WLR, change HR to wHR
   if (method == "wlr") xy <- replace_names(xy, c("~hr at bound" = "~whr at bound"))
 
-  # If the method is COMBO, remove the column of "~HR at bound", and remove AHR from header
-  if (method == "combo" && "~hr at bound" %in% names(xy))
-    stop("'~hr at bound' can't be displayed!")
-
   output <- table_ab(
     # A data frame to be show as the summary header
     # It has only ONE record for each value of `byvar`
@@ -405,17 +400,18 @@ get_decimals <- function(vars, decs, vars_default, decs_default) {
 # capitalize variable names
 cap_names <- function(x) {
   low <- c(
-    "analysis", "design", "power", "time", "event", "n", "bound", "z",
+    "analysis", "design", "power", "time", "n", "bound", "z",
     "~risk difference at bound", "~hr at bound", "~whr at bound", "nominal p"
   )
   # map lowercase names to capitalized names
   map <- setNames(cap_initial(low), low)
   map <- gsub("^~risk ", "~Risk ", map)
   map <- gsub("^(~w?)(hr) ", "\\1HR ", map, perl = TRUE)
   map <- c(
-    map, ahr = "AHR", rd = "Risk difference", probability = "Alternate hypothesis",
-    probability0 = "Null hypothesis", info_frac0 = "Information fraction",
-    info_frac = "Information fraction", event_frac = "Event fraction"
+    map, ahr = "AHR", event = "Events", rd = "Risk difference",
+    probability = "Alternate hypothesis", probability0 = "Null hypothesis",
+    info_frac0 = "Information fraction", info_frac = "Information fraction",
+    event_frac = "Event fraction"
   )
   replace_names(x, map)
 }
diff --git a/tests/testthat/_snaps/independent_as_gt.md b/tests/testthat/_snaps/independent_as_gt.md
@@ -73,7 +73,7 @@
     \cmidrule(lr){5-6}
     Bound & Z & Nominal p\textsuperscript{\textit{1}} & \textasciitilde{}HR at bound\textsuperscript{\textit{2}} & Alternate hypothesis & Null hypothesis \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 1 Time: 36 N: 476 Event: 291.9 AHR: 0.68 Information fraction: 1} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 1 Time: 36 N: 476 Events: 291.9 AHR: 0.68 Information fraction: 1} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Efficacy & 1.96 & 0.025 & 0.795 & 0.9 & 0.025 \\ 
     \bottomrule
@@ -99,17 +99,17 @@
     \cmidrule(lr){5-6}
     Bound & Z & Nominal p\textsuperscript{\textit{1}} & \textasciitilde{}HR at bound\textsuperscript{\textit{2}} & Alternate hypothesis & Null hypothesis \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Event: 30 AHR: 0.79 Information fraction: 0.6} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Events: 30 AHR: 0.79 Information fraction: 0.6} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -1.17 & 0.8792 & 1.5392 & 0.0349 & 0.1208 \\ 
     Efficacy & 2.67 & 0.0038 & 0.3743 & 0.0231 & 0.0038 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Event: 40 AHR: 0.74 Information fraction: 0.8} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Events: 40 AHR: 0.74 Information fraction: 0.8} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.66 & 0.7462 & 1.2359 & 0.0668 & 0.2655 \\ 
     Efficacy & 2.29 & 0.0110 & 0.4812 & 0.0897 & 0.0122 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Event: 50 AHR: 0.71 Information fraction: 1} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Events: 50 AHR: 0.71 Information fraction: 1} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.23 & 0.5897 & 1.0670 & 0.1008 & 0.4303 \\ 
     Efficacy & 2.03 & 0.0211 & 0.5595 & 0.2070 & 0.0250 \\ 
@@ -136,7 +136,7 @@
     \cmidrule(lr){5-6}
     Bound & Z & Nominal p\textsuperscript{\textit{1}} & \textasciitilde{}wHR at bound\textsuperscript{\textit{2}} & Alternate hypothesis & Null hypothesis \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 1 Time: 36 N: 471.1 Event: 289 AHR: 0.68 Information fraction: 1\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 1 Time: 36 N: 471.1 Events: 289 AHR: 0.68 Information fraction: 1\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Efficacy & 1.96 & 0.025 & 0.7941 & 0.9 & 0.025 \\ 
     \bottomrule
@@ -163,17 +163,17 @@
     \cmidrule(lr){5-6}
     Bound & Z & Nominal p & \textasciitilde{}wHR at bound\textsuperscript{\textit{3}} & Alternate hypothesis & Null hypothesis \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Event: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{4}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Events: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{4}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -1.17 & 0.8798 & 1.5353 & 0.0341 & 0.1202 \\ 
     Efficacy & 2.68 & 0.0037 & 0.3765 & 0.0217 & 0.0037 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Event: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{4}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Events: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{4}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.66 & 0.7452 & 1.2319 & 0.0664 & 0.2664 \\ 
     Efficacy & 2.29 & 0.0110 & 0.4846 & 0.0886 & 0.0121 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Event: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{4}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Events: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{4}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.22 & 0.5881 & 1.0650 & 0.1002 & 0.4319 \\ 
     Efficacy & 2.03 & 0.0212 & 0.5631 & 0.2071 & 0.0250 \\ 
@@ -202,17 +202,17 @@
     \cmidrule(lr){4-5}
     Bound & Z & Nominal p\textsuperscript{\textit{1}} & Alternate hypothesis & Null hypothesis \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{5}{l}{Analysis: 1 Time: 12 N: 500 Event: 107.4 AHR: 0.84 Event fraction: 0.32\textsuperscript{\textit{2}}} \\[2.5pt] 
+    \multicolumn{5}{l}{Analysis: 1 Time: 12 N: 500 Events: 107.4 AHR: 0.84 Event fraction: 0.32\textsuperscript{\textit{2}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -1 & 0.8413 & 0.0293 & 0.0000 \\ 
     Efficacy & 3 & 0.0013 & 0.0175 & 0.0013 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{5}{l}{Analysis: 2 Time: 24 N: 500 Event: 246.3 AHR: 0.72 Event fraction: 0.74\textsuperscript{\textit{2}}} \\[2.5pt] 
+    \multicolumn{5}{l}{Analysis: 2 Time: 24 N: 500 Events: 246.3 AHR: 0.72 Event fraction: 0.74\textsuperscript{\textit{2}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & 0 & 0.5000 & 0.0314 & 0.0000 \\ 
     Efficacy & 2 & 0.0228 & 0.7261 & 0.0233 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{5}{l}{Analysis: 3 Time: 36 N: 500 Event: 331.3 AHR: 0.68 Event fraction: 1\textsuperscript{\textit{2}}} \\[2.5pt] 
+    \multicolumn{5}{l}{Analysis: 3 Time: 36 N: 500 Events: 331.3 AHR: 0.68 Event fraction: 1\textsuperscript{\textit{2}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & 1 & 0.1587 & 0.0326 & 0.0000 \\ 
     Efficacy & 1 & 0.1587 & 0.9674 & 0.1956 \\ 
@@ -299,17 +299,17 @@
     \cmidrule(lr){5-6}
     Bound & Z & Nominal p\textsuperscript{\textit{1}} & \textasciitilde{}wHR at bound\textsuperscript{\textit{2}} & Alternate hypothesis & Null hypothesis \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Event: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Events: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -1.17 & 0.8798 & 1.5353 & 0.0341 & 0.1202 \\ 
     Efficacy & 2.68 & 0.0037 & 0.3765 & 0.0217 & 0.0037 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Event: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Events: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.66 & 0.7452 & 1.2319 & 0.0664 & 0.2664 \\ 
     Efficacy & 2.29 & 0.0110 & 0.4846 & 0.0886 & 0.0121 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Event: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Events: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.22 & 0.5881 & 1.0650 & 0.1002 & 0.4319 \\ 
     Efficacy & 2.03 & 0.0212 & 0.5631 & 0.2071 & 0.0250 \\ 
@@ -337,17 +337,17 @@
     \cmidrule(lr){5-6}
     Bound & Z & Nominal p\textsuperscript{\textit{1}} & \textasciitilde{}wHR at bound\textsuperscript{\textit{2}} & under H1 & under H0 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Event: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Events: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -1.17 & 0.8798 & 1.5353 & 0.0341 & 0.1202 \\ 
     Efficacy & 2.68 & 0.0037 & 0.3765 & 0.0217 & 0.0037 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Event: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Events: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.66 & 0.7452 & 1.2319 & 0.0664 & 0.2664 \\ 
     Efficacy & 2.29 & 0.0110 & 0.4846 & 0.0886 & 0.0121 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Event: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Events: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.22 & 0.5881 & 1.0650 & 0.1002 & 0.4319 \\ 
     Efficacy & 2.03 & 0.0212 & 0.5631 & 0.2071 & 0.0250\textsuperscript{\textit{4}} \\ 
@@ -376,17 +376,17 @@
     \cmidrule(lr){5-6}
     Bound & Z & Nominal p & \textasciitilde{}wHR at bound\textsuperscript{\textit{3}} & Alternate hypothesis & Null hypothesis \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Event: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{4}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Events: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{4}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -1.17 & 0.8798 & 1.5353 & 0.0341 & 0.1202 \\ 
     Efficacy & 2.68 & 0.0037 & 0.3765 & 0.0217 & 0.0037 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Event: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{4}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Events: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{4}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.66 & 0.7452 & 1.2319 & 0.0664 & 0.2664 \\ 
     Efficacy & 2.29 & 0.0110 & 0.4846 & 0.0886 & 0.0121 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Event: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{4}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Events: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{4}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & -0.22 & 0.5881 & 1.0650 & 0.1002 & 0.4319 \\ 
     Efficacy & 2.03 & 0.0212 & 0.5631 & 0.2071 & 0.0250 \\ 
@@ -415,15 +415,15 @@
     \cmidrule(lr){5-6}
     Bound & Z & Nominal p\textsuperscript{\textit{1}} & \textasciitilde{}wHR at bound\textsuperscript{\textit{2}} & Alternate hypothesis & Null hypothesis \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Event: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 1 Time: 14.9 N: 108 Events: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Efficacy & 2.68 & 0.0037 & 0.3765 & 0.0217 & 0.0037 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Event: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 2 Time: 19.2 N: 108 Events: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Efficacy & 2.29 & 0.0110 & 0.4846 & 0.0886 & 0.0121 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Event: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{3}}} \\[2.5pt] 
+    \multicolumn{6}{l}{Analysis: 3 Time: 24.5 N: 108 Events: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{3}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Efficacy & 2.03 & 0.0212 & 0.5631 & 0.2071 & 0.0250 \\ 
     \bottomrule
@@ -450,17 +450,17 @@
     \cmidrule(lr){4-5}
     Bound & Nominal p\textsuperscript{\textit{1}} & Z & Alternate hypothesis & Null hypothesis \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{5}{l}{Analysis: 1 Time: 14.9 N: 108 Event: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{2}}} \\[2.5pt] 
+    \multicolumn{5}{l}{Analysis: 1 Time: 14.9 N: 108 Events: 30 AHR: 0.79 Information fraction: 0.6\textsuperscript{\textit{2}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & 0.8798 & -1.17 & 0.0341 & 0.1202 \\ 
     Efficacy & 0.0037 & 2.68 & 0.0217 & 0.0037 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{5}{l}{Analysis: 2 Time: 19.2 N: 108 Event: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{2}}} \\[2.5pt] 
+    \multicolumn{5}{l}{Analysis: 2 Time: 19.2 N: 108 Events: 40 AHR: 0.75 Information fraction: 0.8\textsuperscript{\textit{2}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & 0.7452 & -0.66 & 0.0664 & 0.2664 \\ 
     Efficacy & 0.0110 & 2.29 & 0.0886 & 0.0121 \\ 
     \midrule\addlinespace[2.5pt]
-    \multicolumn{5}{l}{Analysis: 3 Time: 24.5 N: 108 Event: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{2}}} \\[2.5pt] 
+    \multicolumn{5}{l}{Analysis: 3 Time: 24.5 N: 108 Events: 50 AHR: 0.71 Information fraction: 1\textsuperscript{\textit{2}}} \\[2.5pt] 
     \midrule\addlinespace[2.5pt]
     Futility & 0.5881 & -0.22 & 0.1002 & 0.4319 \\ 
     Efficacy & 0.0212 & 2.03 & 0.2071 & 0.0250 \\ 

diff --git a/tests/testthat/_snaps/independent_as_rtf/gs_design_ahr.rtf b/tests/testthat/_snaps/independent_as_rtf/gs_design_ahr.rtf
@@ -42,7 +42,7 @@
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrr\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx9000
-\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 1 Time: 36 N: 476 Event: 291.9 AHR: 0.68 Information fraction: 1}\cell
+\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 1 Time: 36 N: 476 Events: 291.9 AHR: 0.68 Information fraction: 1}\cell
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx1500

diff --git a/tests/testthat/_snaps/independent_as_rtf/gs_design_wlr.rtf b/tests/testthat/_snaps/independent_as_rtf/gs_design_wlr.rtf
@@ -42,7 +42,7 @@
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrr\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx9000
-\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 1 Time: 36 N: 471.1 Event: 289 AHR: 0.68 Information fraction: 1 {\super c}}\cell
+\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 1 Time: 36 N: 471.1 Events: 289 AHR: 0.68 Information fraction: 1 {\super c}}\cell
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx1500

diff --git a/tests/testthat/_snaps/independent_as_rtf/gs_power_wlr.rtf b/tests/testthat/_snaps/independent_as_rtf/gs_power_wlr.rtf
@@ -42,7 +42,7 @@
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrr\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx9000
-\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 1 Time: 14.9 N: 108 Event: 30 AHR: 0.79 Information fraction: 0.6 {\super c}}\cell
+\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 1 Time: 14.9 N: 108 Events: 30 AHR: 0.79 Information fraction: 0.6 {\super c}}\cell
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx1500
@@ -74,7 +74,7 @@
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrr\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx9000
-\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 2 Time: 19.2 N: 108 Event: 40 AHR: 0.75 Information fraction: 0.8 {\super c}}\cell
+\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 2 Time: 19.2 N: 108 Events: 40 AHR: 0.75 Information fraction: 0.8 {\super c}}\cell
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx1500
@@ -106,7 +106,7 @@
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrr\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx9000
-\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 3 Time: 24.5 N: 108 Event: 50 AHR: 0.71 Information fraction: 1 {\super c}}\cell
+\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 3 Time: 24.5 N: 108 Events: 50 AHR: 0.71 Information fraction: 1 {\super c}}\cell
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx1500

diff --git a/tests/testthat/_snaps/independent_as_rtf/gs_power_wlr_cols_display.rtf b/tests/testthat/_snaps/independent_as_rtf/gs_power_wlr_cols_display.rtf
@@ -40,7 +40,7 @@
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrr\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx9000
-\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 1 Time: 14.9 N: 108 Event: 30 AHR: 0.79 Information fraction: 0.6 {\super b}}\cell
+\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 1 Time: 14.9 N: 108 Events: 30 AHR: 0.79 Information fraction: 0.6 {\super b}}\cell
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx1800
@@ -68,7 +68,7 @@
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrr\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx9000
-\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 2 Time: 19.2 N: 108 Event: 40 AHR: 0.75 Information fraction: 0.8 {\super b}}\cell
+\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 2 Time: 19.2 N: 108 Events: 40 AHR: 0.75 Information fraction: 0.8 {\super b}}\cell
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx1800
@@ -96,7 +96,7 @@
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrr\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx9000
-\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 3 Time: 24.5 N: 108 Event: 50 AHR: 0.71 Information fraction: 1 {\super b}}\cell
+\pard\hyphpar0\sb15\sa15\fi0\li0\ri0\ql\fs18{\f0 Analysis: 3 Time: 24.5 N: 108 Events: 50 AHR: 0.71 Information fraction: 1 {\super b}}\cell
 \intbl\row\pard
 \trowd\trgaph108\trleft0\trqc
 \clbrdrl\brdrs\brdrw15\clbrdrt\brdrs\brdrw15\clbrdrb\brdrs\brdrw15\clvertalt\cellx1800