diff --git a/tests/visual_tests/longtable.Rmd b/tests/visual_tests/longtable.Rmd
new file mode 100644
index 0000000..7070302
--- /dev/null
+++ b/tests/visual_tests/longtable.Rmd
@@ -0,0 +1,20 @@
+---
+title: "Untitled"
+output: pdf_document
+---
+
+```{r setup, include=FALSE}
+knitr::opts_chunk$set(echo = TRUE)
+```
+
+```{r}
+library(tidyverse)
+library(knitr)
+library(kableExtra)
+
+dt <- rbind(mtcars, mtcars) 
+
+kable(dt, "latex", longtable = T, booktabs = T) %>%
+  add_header_above(c(" ", "a" = 6, "b" = 5)) %>%
+  kable_styling(latex_options = "repeat_header")
+```
