blob: 820ac600481eccc6a236d63837f81b530e164728 [file] [log] [blame]
---
title: "xtable & kableExtra"
author: "Hao"
date: "2/13/2019"
output: pdf_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(message = FALSE)
```
Recent versions of kableExtra (since 1.0) offers a function `xtable2kable`, which, as suggested by its name, turns a `xtable` object to a `kable` object so you can use functions in kableExtra after that. I tested some basic examples and it seem to work.
```{r}
library(xtable)
library(kableExtra)
xtable(mtcars[1:5, 1:5]) %>%
xtable2kable() %>%
column_spec(1, width = "5cm")
```
```{r}
xtable(mtcars[1:5, 1:5], caption = "Some long caption") %>%
xtable2kable(caption.width = "10em") %>%
column_spec(1, color = "red")
```