Mirror mirror tell me, how does this kable look like?

magic_mirror(kable_input)

Arguments

kable_input

The output of kable

Examples

magic_mirror(knitr::kable(head(mtcars), "html"))
#> $caption
#> [1] NA
#> 
#> $colnames
#>  [1] ""     "mpg"  "cyl"  "disp" "hp"   "drat" "wt"   "qsec" "vs"   "am"  
#> [11] "gear" "carb"
#> 
#> $ncol
#> [1] 12
#> 
#> $nrow_header
#> [1] 1
#> 
#> $table_class
#> [1] NA
#> 
#> $table_style
#> [1] NA
#>