if (FALSE) {
# Specify table size by pixels
kable(cbind(mtcars, mtcars), "html") %>%
kable_styling() %>%
scroll_box(width = "500px", height = "200px")
# Specify by percent
kable(cbind(mtcars, mtcars), "html") %>%
kable_styling() %>%
scroll_box(width = "100%", height = "200px")
}
Run the code above in your browser using DataLab