diff --git a/tests/testthat/source_code/lsfae01.R b/tests/testthat/source_code/lsfae01.R
index 861bd2b6..696c0c0f 100644
--- a/tests/testthat/source_code/lsfae01.R
+++ b/tests/testthat/source_code/lsfae01.R
@@ -208,4 +208,9 @@ result <- set_titles(result, tab_titles)
 # Output listing
 ###############################################################################
 
-tt_to_tlgrtf(head(result, 100), file = fileid, orientation = "landscape")
+tt_to_tlgrtf(head(result, 100),
+  file = fileid, orientation = "landscape",
+  alignments = list(
+    list(row = 1:100, col = 1:8, value = "left")
+  )
+)
diff --git a/tests/testthat/source_code/tsfae09.R b/tests/testthat/source_code/tsfae09.R
index f26a720e..fea799f3 100644
--- a/tests/testthat/source_code/tsfae09.R
+++ b/tests/testthat/source_code/tsfae09.R
@@ -194,4 +194,6 @@ result <- set_titles(result, tab_titles)
 # Convert to tbl file and output table
 ################################################################################
 
-tt_to_tlgrtf(result, file = fileid, orientation = "landscape")
+tt_to_tlgrtf(head(result, 100), file = fileid, orientation = "landscape", alignments = list(
+  list(row = 1:10, col = 1:4, value = "left")
+))
diff --git a/tests/testthat/source_code/tsidem01.R b/tests/testthat/source_code/tsidem01.R
index bb9ce26b..b3fd519d 100644
--- a/tests/testthat/source_code/tsidem01.R
+++ b/tests/testthat/source_code/tsidem01.R
@@ -232,8 +232,9 @@ lyt <- basic_table(
       .stats = c("n", "mean_sd", "median", "range", "count_fraction"),
       .labels = c("n" = "N", "range" = "Min, max"),
       .formats = c(P1_precision,
-                   n = jjcsformat_xx("xx"),
-                   "count_fraction" = jjcsformat_count_fraction),
+        n = jjcsformat_xx("xx"),
+        "count_fraction" = jjcsformat_count_fraction
+      ),
       .indent_mods = c(
         "n" = 0L,
         "mean_sd" = 1L,
@@ -265,8 +266,9 @@ lyt <- basic_table(
       .stats = c("n", "mean_sd", "median", "range", "count_fraction"),
       .labels = c("n" = "N", "range" = "Min, max"),
       .formats = c(P2a_precision,
-                   n = jjcsformat_xx("xx"),
-                   "count_fraction" = jjcsformat_count_fraction),
+        n = jjcsformat_xx("xx"),
+        "count_fraction" = jjcsformat_count_fraction
+      ),
       .indent_mods = c(
         "n" = 0L,
         "mean_sd" = 1L,
@@ -285,8 +287,9 @@ lyt <- basic_table(
       .stats = c("n", "mean_sd", "median", "range", "count_fraction"),
       .labels = c("n" = "N", "range" = "Min, max"),
       .formats = c(P2b_precision,
-                   n = jjcsformat_xx("xx"),
-                   "count_fraction" = jjcsformat_count_fraction),
+        n = jjcsformat_xx("xx"),
+        "count_fraction" = jjcsformat_count_fraction
+      ),
       .indent_mods = c(
         "n" = 0L,
         "mean_sd" = 1L,