diff --git a/R/remove_column.R b/R/remove_column.R
index 3bff2f1..4cc74f4 100644
--- a/R/remove_column.R
+++ b/R/remove_column.R
@@ -7,7 +7,9 @@
 #' @export
 #'
 #' @examples
+#' \dontrun{
 #' remove_column(kable(mtcars), 1)
+#' }
 remove_column <- function (kable_input, columns) {
     if (is.null(columns)) return(kable_input)
     kable_format <- attr(kable_input, "format")