diff --git a/tests/visual_tests/collapse_rows_html.Rmd b/tests/visual_tests/collapse_rows_html.Rmd
index 9722d3d..9ca589e 100644
--- a/tests/visual_tests/collapse_rows_html.Rmd
+++ b/tests/visual_tests/collapse_rows_html.Rmd
@@ -6,6 +6,7 @@
 ```{r}
 library(knitr)
 library(kableExtra)
+set.seed(100)
 collapse_rows_dt <- data.frame(C1 = c(rep("a", 10), rep("b", 5)),
                  C2 = c(rep("c", 7), rep("d", 3), rep("c", 2), rep("d", 3)),
                  C3 = 1:15,
diff --git a/tests/visual_tests/column_row_spec_html.Rmd b/tests/visual_tests/column_row_spec_html.Rmd
index aee5f70..919e4e7 100644
--- a/tests/visual_tests/column_row_spec_html.Rmd
+++ b/tests/visual_tests/column_row_spec_html.Rmd
@@ -38,10 +38,10 @@
 )
 
 kable(dt, "html") %>%
-  kable_styling(full_width = F) %>%
+  kable_styling(full_width = F)   %>%
+  row_spec(1, bold = T) %>%
   column_spec(2, "5cm", bold = T) %>%
-  column_spec(4, "3cm", italic = T)  %>%
-  row_spec(1, bold = T)
+  column_spec(4, "3cm", italic = T)
 ```
 
 ```{r}