--- | |
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)) | |
``` |