Plain HTML
library(knitr)
library(kableExtra)
dt <- mtcars[1:5, 1:2]
kable_input <- kable(dt, format = "html")
Basic Bootstrap Table
kable(dt, format = "html") %>%
htmlTable_styling()
|
mpg
|
cyl
|
Mazda RX4
|
21.0
|
6
|
Mazda RX4 Wag
|
21.0
|
6
|
Datsun 710
|
22.8
|
4
|
Hornet 4 Drive
|
21.4
|
6
|
Hornet Sportabout
|
18.7
|
8
|
Boostrap Table Options
Striped
kable(dt, format = "html") %>%
htmlTable_styling(bootstrap_options = "striped")
|
mpg
|
cyl
|
Mazda RX4
|
21.0
|
6
|
Mazda RX4 Wag
|
21.0
|
6
|
Datsun 710
|
22.8
|
4
|
Hornet 4 Drive
|
21.4
|
6
|
Hornet Sportabout
|
18.7
|
8
|
Striped + Hover
kable(dt, format = "html") %>%
htmlTable_styling(c("striped", "hover"))
|
mpg
|
cyl
|
Mazda RX4
|
21.0
|
6
|
Mazda RX4 Wag
|
21.0
|
6
|
Datsun 710
|
22.8
|
4
|
Hornet 4 Drive
|
21.4
|
6
|
Hornet Sportabout
|
18.7
|
8
|
Other bootstrap options
kable(dt, format = "html") %>%
htmlTable_styling(c("striped", "bordered", "hover", "condensed", "responsive"))
|
mpg
|
cyl
|
Mazda RX4
|
21.0
|
6
|
Mazda RX4 Wag
|
21.0
|
6
|
Datsun 710
|
22.8
|
4
|
Hornet 4 Drive
|
21.4
|
6
|
Hornet Sportabout
|
18.7
|
8
|
“Thin” Table and Floating options
kable(dt, format = "html") %>%
htmlTable_styling(c("striped", "bordered", "condensed"), full_width = F)
|
mpg
|
cyl
|
Mazda RX4
|
21.0
|
6
|
Mazda RX4 Wag
|
21.0
|
6
|
Datsun 710
|
22.8
|
4
|
Hornet 4 Drive
|
21.4
|
6
|
Hornet Sportabout
|
18.7
|
8
|
kable(dt, format = "html") %>%
htmlTable_styling(c("striped", "bordered", "condensed"), full_width = F, float = "left") %>%
htmlTable_add_header_above(c("", "Names" = 2))
|
Names
|
|
mpg
|
cyl
|
Mazda RX4
|
21.0
|
6
|
Mazda RX4 Wag
|
21.0
|
6
|
Datsun 710
|
22.8
|
4
|
Hornet 4 Drive
|
21.4
|
6
|
Hornet Sportabout
|
18.7
|
8
|