Publication/Presentation-ready Tables
Janani Ravi
Michigan State University + R-Ladies East Lansing
2021-05-09
1 / 17
Slides made with xaringan (Yihui Xie) and R-Ladies theme (Allison Hill).
2 / 17
Overview
3 / 17
GT
4 / 17
knitr
5 / 17
rmarkdown
6 / 17
DT & datatables
7 / 17
Explore later: flextable
8 / 17
Let's create a few cool tables!
9 / 17
Tables w/ knitr
If you want to generate a table, make sure it is in the HTML format (instead of Markdown or other formats), e.g.,
knitr::kable(head(iris), format = 'html')| Sepal.Length | Sepal.Width | Petal.Length | Petal.Width | Species |
|---|---|---|---|---|
| 5.1 | 3.5 | 1.4 | 0.2 | setosa |
| 4.9 | 3.0 | 1.4 | 0.2 | setosa |
| 4.7 | 3.2 | 1.3 | 0.2 | setosa |
| 4.6 | 3.1 | 1.5 | 0.2 | setosa |
| 5.0 | 3.6 | 1.4 | 0.2 | setosa |
| 5.4 | 3.9 | 1.7 | 0.4 | setosa |
10 / 17
Tables w/ rmarkdown
paged_table(iris)| ABCDEFGHIJ0123456789 |
Sepal.Length <dbl> | Sepal.Width <dbl> | Petal.Length <dbl> | Petal.Width <dbl> | Species <fct> |
|---|---|---|---|---|
| 5.1 | 3.5 | 1.4 | 0.2 | setosa |
| 4.9 | 3.0 | 1.4 | 0.2 | setosa |
| 4.7 | 3.2 | 1.3 | 0.2 | setosa |
| 4.6 | 3.1 | 1.5 | 0.2 | setosa |
| 5.0 | 3.6 | 1.4 | 0.2 | setosa |
| 5.4 | 3.9 | 1.7 | 0.4 | setosa |
| 4.6 | 3.4 | 1.4 | 0.3 | setosa |
| 5.0 | 3.4 | 1.5 | 0.2 | setosa |
| 4.4 | 2.9 | 1.4 | 0.2 | setosa |
| 4.9 | 3.1 | 1.5 | 0.1 | setosa |
11 / 17
Tables w/ kableExtra
iris %>% head %>% kable(caption = "Table 1. Annotate with kableExtra") %>% kable_styling(c("striped", "hover", "condensed"), full_width = F, position = "left") %>% add_header_above(c("categorical"=1, "numerical" = 4)) %>% column_spec(1, bold = T) %>% row_spec(0, italic = T)categorical |
numerical |
|||
|---|---|---|---|---|
| Sepal.Length | Sepal.Width | Petal.Length | Petal.Width | Species |
| 5.1 | 3.5 | 1.4 | 0.2 | setosa |
| 4.9 | 3.0 | 1.4 | 0.2 | setosa |
| 4.7 | 3.2 | 1.3 | 0.2 | setosa |
| 4.6 | 3.1 | 1.5 | 0.2 | setosa |
| 5.0 | 3.6 | 1.4 | 0.2 | setosa |
| 5.4 | 3.9 | 1.7 | 0.4 | setosa |
12 / 17
Tables w/ gt
13 / 17
DT and datatable
iris %>% head() %>% datatable(fillContainer=FALSE, options=list(pageLength=8))14 / 17
References
- knitr: https://yihui.org/knitr/
- kableExtra: https://haozhu233.github.io/kableExtra/
- rmarkdown: https://rmarkdown.rstudio.com/
- DT: https://rstudio.github.io/DT/
- GT: https://gt.rstudio.com/index.html (cites other useful packages too)
- Also checkout flextable: https://davidgohel.github.io/flextable/
16 / 17
Thanks!
How to reach me?
Email: janani@msu.edu
Webpage: jravilab.github.io
Twitter: @janani137
Slides created via the R package xaringan (Yihui Xie) and R-Ladies theme (Allison Hill).
17 / 17