diff --git a/tests/visual_tests/duplicated rows.Rmd b/tests/visual_tests/duplicated rows.Rmd
new file mode 100644
index 0000000..aec300b
--- /dev/null
+++ b/tests/visual_tests/duplicated rows.Rmd
@@ -0,0 +1,15 @@
+---
+title: "duplicated rows"
+output: pdf_document
+---
+
+```{r}
+library(dplyr)
+library(kableExtra)
+
+tbl1 <- bind_rows(mtcars, mtcars, mtcars, mtcars)
+
+kable(tbl1, longtable = T, row.names = 1:128) %>%
+  pack_rows(index = c("g1" = 3, "g2" = 6, "g3" = 5, "g4" = 5, "g1" = 3, "g2" = 6, "g3" = 5, "g4" = 5,
+                      "g1" = 3, "g2" = 6, "g3" = 5, "g4" = 5))
+```
