Simplify count_occurrences indent mods (#139)

Closes #138
insightsengineering · Oct 31, 2023 · 0dfc5c2 · 0dfc5c2
1 parent 23f775a
commit 0dfc5c2
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 9 deletions.
diff --git a/book/tables/adverse-events/aet02.qmd b/book/tables/adverse-events/aet02.qmd
@@ -190,7 +190,7 @@ lyt <- basic_table(show_colcounts = TRUE) %>%
       nonunique = "Total number of events"
     )
   ) %>%
-  count_occurrences(vars = "AEDECOD", .indent_mods = c(count_fraction = -1L)) %>%
+  count_occurrences(vars = "AEDECOD", .indent_mods = -1L) %>%
   append_varlabels(adae, c("AEDECOD"), indent = 2L)
 
 result <- build_table(lyt, df = adae, alt_counts_df = adsl) %>%
@@ -268,7 +268,7 @@ lyt <- basic_table(show_colcounts = TRUE) %>%
       nonunique = "Total number of events"
     )
   ) %>%
-  count_occurrences(vars = "AEDECOD", .indent_mods = c(count_fraction = -1L)) %>%
+  count_occurrences(vars = "AEDECOD", .indent_mods = -1L) %>%
   append_varlabels(adae, "AEDECOD", indent = 1L)
 
 result <- build_table(lyt, df = adae_5, alt_counts_df = adsl) %>%
@@ -306,7 +306,7 @@ lyt <- basic_table(show_colcounts = TRUE) %>%
   ) %>%
   count_occurrences(
     vars = "AEDECOD",
-    .indent_mods = c(count_fraction = 1L)
+    .indent_mods = 1L
   ) %>%
   append_varlabels(adae, "AEDECOD", indent = 1L)
 
@@ -418,7 +418,7 @@ lyt <- basic_table(show_colcounts = TRUE) %>%
   ) %>%
   count_occurrences(
     vars = "AEDECOD",
-    .indent_mods = c(count_fraction = 1L)
+    .indent_mods = 1L
   ) %>%
   append_varlabels(adae, "AEDECOD", indent = 1L)
 
@@ -466,7 +466,7 @@ lyt <- basic_table(show_colcounts = TRUE) %>%
   ) %>%
   count_occurrences(
     vars = "AEDECOD",
-    .indent_mods = c(count_fraction = 1L)
+    .indent_mods = 1L
   ) %>%
   append_varlabels(adae, "AEDECOD", indent = 1L)
 
@@ -514,7 +514,7 @@ lyt <- basic_table(show_colcounts = TRUE) %>%
   ) %>%
   count_occurrences(
     vars = "AEDECOD",
-    .indent_mods = c(count_fraction = 1L)
+    .indent_mods = 1L
   ) %>%
   append_varlabels(adae, "AEDECOD", indent = 1L)
 
@@ -562,7 +562,7 @@ lyt <- basic_table(show_colcounts = TRUE) %>%
   ) %>%
   count_occurrences(
     vars = "AEDECOD",
-    .indent_mods = c(count_fraction = 1L)
+    .indent_mods = 1L
   ) %>%
   append_varlabels(adae, "AEDECOD", indent = 1L)
 
@@ -610,7 +610,7 @@ lyt <- basic_table(show_colcounts = TRUE) %>%
   ) %>%
   count_occurrences(
     vars = "AEDECOD",
-    .indent_mods = c(count_fraction = 1L)
+    .indent_mods = 1L
   ) %>%
   append_varlabels(adae, "AEDECOD", indent = 1L)
 

diff --git a/book/tables/adverse-events/aet09.qmd b/book/tables/adverse-events/aet09.qmd
@@ -141,7 +141,7 @@ lyt <- basic_table(show_colcounts = TRUE) %>%
   ) %>%
   count_occurrences(
     vars = "AEDECOD",
-    .indent_mods = c(count_fraction = -1L)
+    .indent_mods = -1L
   ) %>%
   append_varlabels(adae_f, c("AEDECOD"), indent = 2L)