Include tables with title and footnotes for word and html documents
Examples
library(inti)
table <- data.frame(
x = rep_len(1, 5)
, y = rep_len(3, 5)
, z = rep_len("c", 5)
)
table %>% inti::include_table(
caption = "Title caption b) line 0
a) line 1
b) line 2"
, notes = "Footnote"
, label = "Where:"
)
#>
#>
#> Table: Title caption b) line 0 a) line 1 b) line 2
#>
#> | x| y|z |
#> |--:|--:|:--|
#> | 1| 3|c |
#> | 1| 3|c |
#> | 1| 3|c |
#> | 1| 3|c |
#> | 1| 3|c |
#>
#> <small>Where:</small>
#> <small>Footnote</small>