diff --git a/inst/doc/htmlTable_styling.R b/inst/doc/htmlTable_styling.R
new file mode 100644
index 0000000..5c50e69
--- /dev/null
+++ b/inst/doc/htmlTable_styling.R
@@ -0,0 +1,28 @@
+## ------------------------------------------------------------------------
+library(knitr)
+library(kableExtra)
+dt <- mtcars[1:5, 1:2]
+
+kable(dt, format = "html")
+
+## ------------------------------------------------------------------------
+kable(dt, format = "html", table.attr = htmlTable_styling())
+
+## ------------------------------------------------------------------------
+kable(dt, format = "html", table.attr = htmlTable_styling(bootstrap_options = "striped"))
+
+## ------------------------------------------------------------------------
+kable(dt, format = "html", table.attr = htmlTable_styling(c("striped", "hover")))
+
+## ------------------------------------------------------------------------
+kable(dt, format = "html", 
+      table.attr = htmlTable_styling(c("striped", "bordered", "hover", "condensed", "responsive")))
+
+## ------------------------------------------------------------------------
+kable(dt, format = "html", 
+      table.attr = htmlTable_styling(
+        c("striped", "bordered", "condensed"), 
+        full_width = F, 
+        float = "center"
+      ))
+