add custom print & knit_print method to display HTML table on the run
diff --git a/R/kable_styling.R b/R/kable_styling.R
index 04176c9..bbb8e07 100644
--- a/R/kable_styling.R
+++ b/R/kable_styling.R
@@ -169,6 +169,7 @@
 
   out <- as_kable_xml(kable_xml)
   attributes(out) <- kable_attrs
+  class(out) <- c("kableExtra", class(out))
   return(out)
 }