Add vignettes
diff --git a/inst/doc/add_footnote_pdf.R b/inst/doc/add_footnote_pdf.R
new file mode 100644
index 0000000..16feda3
--- /dev/null
+++ b/inst/doc/add_footnote_pdf.R
@@ -0,0 +1,23 @@
+## ----through_pandoc------------------------------------------------------
+library(knitr)
+library(kableExtra)
+dt <- mtcars[1:5, 1:2]
+colnames(dt)[1] <- c("mpg[note]")
+rownames(dt)[2] <- c("Mazda RX4 Wag[note]")
+dt[3, 2] <- paste0(dt[3, 2], "[note]")
+
+kable(dt) %>%
+ add_footnote(c("footnote 1", "footnote 2", "footnote 3"))
+
+## ----through_latex_plain-------------------------------------------------
+kable(dt, format = "latex") %>%
+ add_footnote(c("footnote 1", "footnote 2", "footnote 3"))
+
+## ----through_latex_booktabs----------------------------------------------
+kable(dt, format = "latex", booktabs = T) %>%
+ add_footnote(c("footnote 1", "footnote 2", "footnote 3"))
+
+## ----through_latex_longtable---------------------------------------------
+kable(dt, format = "latex", longtable = T, booktabs = T) %>%
+ add_footnote(c("footnote 1", "footnote 2", "footnote 3"))
+