diff --git a/R/add_header_above.R b/R/add_header_above.R
index 48fbc3f..49416ff 100644
--- a/R/add_header_above.R
+++ b/R/add_header_above.R
@@ -48,10 +48,13 @@
 #' @param border_left T/F option for border on the left side in latex.
 #' @param border_right T/F option for border on the right side in latex.
 #'
-#' @examples x <- knitr::kable(head(mtcars), "html")
+#' @examples
+#' \dontrun{
+#' x <- knitr::kable(head(mtcars), "html")
 #' # Add a row of header with 3 columns on the top of the table. The column
 #' # span for the 2nd and 3rd one are 5 & 6.
 #' add_header_above(x, c(" ", "Group 1" = 5, "Group 2" = 6))
+#' }
 #'
 #' @export
 add_header_above <- function(kable_input, header = NULL,