Add examples to the doc site
diff --git a/man/add_header_left.Rd b/man/add_header_left.Rd
index aab6b16..79847f8 100644
--- a/man/add_header_left.Rd
+++ b/man/add_header_left.Rd
@@ -39,3 +39,8 @@
`add_header_above`, users can use this function to add multiple layers of
heading columns one by one.
}
+\examples{
+x <- knitr::kable(head(mtcars), "html")
+add_header_left(x, c("A" = 2, "B" = 2, "C" = 2))
+
+}
diff --git a/man/collapse_rows.Rd b/man/collapse_rows.Rd
index 57b2d7c..49deb7f 100644
--- a/man/collapse_rows.Rd
+++ b/man/collapse_rows.Rd
@@ -18,3 +18,9 @@
and make them multirow cells. Note that if you want to use `column_spec` to
specify column styles, you should use `column_spec` before `collapse_rows`.
}
+\examples{
+dt <- data.frame(a = c(1, 1, 2, 2), b = c("a", "a", "a", "b"))
+x <- knitr::kable(dt, "html")
+collapse_rows(x)
+
+}