Hao Zhu | 8902df8 | 2019-01-07 16:27:32 -0500 | [diff] [blame] | 1 | --- |
| 2 | title: "Save Tables and Use them as Images" |
| 3 | author: "Hao" |
| 4 | date: "1/7/2019" |
| 5 | output: html_document |
| 6 | --- |
| 7 | |
| 8 | Before `kableExtra` 1.0, we have a function called `kable_as_image`, which can transform a LaTeX tables to an image and include it in an rmarkdown document. Starting from `kableExtra` 1.0, we will split this function into two pieces: `save_kable` and `as_image`. `save_kable` will save any LaTeX and **HTML** tables to any format (`html`, `png`, `jpg`, `pdf` etc.). The output format will be defined by the file extension of the output file name. Here are a few examples. |
| 9 | |
| 10 | ```{r, eval=FALSE} |
| 11 | # not evaluating |
| 12 | library(kableExtra) |
| 13 | |
| 14 | kable(mtcars[1:5, ], "html") %>% |
| 15 | kable_styling("striped") %>% |
| 16 | row_spec(1, color = "red") %>% |
| 17 | save_kable("inst/test.pdf") |
| 18 | |
| 19 | kable(mtcars, "latex") %>% |
| 20 | kable_styling(latex_options = "striped") %>% |
| 21 | save_kable("inst/test.png") |
| 22 | ``` |
| 23 | |
| 24 | # Picturizing Tables for cross-formating support |
| 25 | `kableExtra` only supports `HTML` and `LaTeX`. One way to get it work with `Word` is to render the table `as_image`. This example below shows you how to render a LaTeX table in HTML document. |
| 26 | ```{r} |
| 27 | library(kableExtra) |
| 28 | |
| 29 | kable(mtcars, "latex", booktabs = T) %>% |
| 30 | kable_styling(latex_options = c("striped", "scale_down")) %>% |
| 31 | row_spec(1, color = "red") %>% |
| 32 | as_image() |
| 33 | ``` |
| 34 | |
| 35 | You can also specify either `width` or `height` of the image. The image will be scaled properly. |
| 36 | |
| 37 | ```{r} |
| 38 | kable(mtcars, "latex", booktabs = T) %>% |
| 39 | kable_styling(latex_options = c("striped", "scale_down")) %>% |
| 40 | row_spec(1, color = "red") %>% |
| 41 | as_image(width = 8) |
| 42 | ``` |
| 43 | |
| 44 | `as_image` also works for HTML tables. Of course, it is only meaning to do so if you want a HTML bootstrap style table in PDF/Word. |
| 45 | ```{r} |
| 46 | kable(mtcars, "html") %>% |
| 47 | kable_styling("striped") %>% |
| 48 | row_spec(1, color = "red") %>% |
| 49 | as_image(width = 2) |
| 50 | ``` |
| 51 | |
| 52 | One problem with this method, especially if you are using it in `Word`, is that to the end, the product you made is a picture. Please make sure your reader be aware that they cannot select/edit the table. |