Style a Tiny Table

Alias for style_tt()

Usage

style_tt(
  x,
  i = NULL,
  j = NULL,
  bold = NULL,
  italic = NULL,
  monospace = NULL,
  smallcap = NULL,
  underline = NULL,
  strikeout = NULL,
  color = NULL,
  background = NULL,
  fontsize = NULL,
  align = NULL,
  alignv = NULL,
  colspan = NULL,
  rowspan = NULL,
  indent = NULL,
  line = NULL,
  line_color = NULL,
  line_width = 0.1,
  line_trim = NULL,
  finalize = NULL,
  ...
)

tt_style(
  x,
  i = NULL,
  j = NULL,
  bold = NULL,
  italic = NULL,
  monospace = NULL,
  smallcap = NULL,
  underline = NULL,
  strikeout = NULL,
  color = NULL,
  background = NULL,
  fontsize = NULL,
  align = NULL,
  alignv = NULL,
  colspan = NULL,
  rowspan = NULL,
  indent = NULL,
  line = NULL,
  line_color = NULL,
  line_width = 0.1,
  line_trim = NULL,
  finalize = NULL,
  ...
)

Arguments

x

A table object created by tt().

i

Numeric vector, logical matrix, string, or unquoted expression.

Numeric vector: Row indices where the styling should be applied. Can be a single value or a vector.
Logical matrix: A matrix with the same number of rows and columns as x. i=0 is the header, and negative values are higher level headers. Row indices refer to rows after the insertion of row labels by group_tt(), when applicable.
String: Table components "caption", "colnames", "groupi" (row group labels), "~groupi" (non-group rows), "groupj" (column group labels), "notes".
Unquoted expression: When supplying an unquoted expression, it is first evaluated in the calling environment, then in the data frame passed to tt().

j

Column indices where the styling should be applied. Can be:

Integer vectors indicating column positions.
Character vector indicating column names.
A single string specifying a Perl-style regular expression used to match column names.
Unquoted expression: Non-standard evaluation is supported. When supplying an unquoted expression, it is first evaluated in the calling environment, then in an environment that includes the columns of the original data passed to tt(), and groupi indices. See examples below.

bold

Logical; if TRUE, text is styled in bold.

italic

Logical; if TRUE, text is styled in italic.

monospace

Logical; if TRUE, text is styled in monospace font.

smallcap

Logical; if TRUE, text is styled in small caps. In Markdown output format, text is converted to uppercase.

underline

Logical; if TRUE, text is underlined.

strikeout

Logical; if TRUE, text has a strike through line.

color

Text color. Colors are standardized across output formats and can be specified as:

Hex codes: "#CC79A7", "#FF0000", "#123ABC"
R color names: Any color recognized by R, such as "red", "blue", "forestgreen", "lightblue"
Extended color names: 749+ named colors from the LaTeX xcolor package (see tinytable:::latex_colors for the full list)
LaTeX color blending (LaTeX output only): "white!80!blue", "red!50", "green!20!red"

background

Background color. Same color specification options as the color parameter. Can be NULL for default color.

fontsize

Font size in em units. Can be NULL for default size.

align

A single character or a string with a number of characters equal to the number of columns in j. Valid characters include 'c' (center), 'l' (left), 'r' (right), 'd' (decimal). Decimal alignment is only available in LaTeX via the siunitx package. The width of columns is determined by the maximum number of digits to the left and to the right in all cells specified by i and j.

alignv

A single character specifying vertical alignment. Valid characters include 't' (top), 'm' (middle), 'b' (bottom).

colspan

Number of columns a cell should span. i and j must be of length 1.

rowspan

Number of rows a cell should span. i and j must be of length 1.

indent

Text indentation in em units. Positive values only.

line

String determines if solid lines (rules or borders) should be drawn around the cell, row, or column.

"t": top
"b": bottom
"l": left
"r": right
Can be combined such as: "lbt" to draw borders at the left, bottom, and top.

line_color

Color of the line. See the color argument for details.

line_width

Width of the line in em units (default: 0.1).

line_trim

String specifying line trimming. Acceptable values: "l" (left), "r" (right), "lr" (both sides). When specified, shortens the lines by 0.8pt on the specified side(s). Default: NULL (no trimming).

finalize

A function applied to the table object at the very end of table-building, for post-processing. For example, the function could use regular expressions to add LaTeX commands to the text version of the table hosted in x@table_string, or it could programmatically change the caption in x@caption.

...

extra arguments are ignored

Value

An object of class tt representing the table.

Details

This function applies styling to a table created by tt(). It allows customization of text style (bold, italic, monospace), text and background colors, font size, cell width, text alignment, column span, and indentation. The function also supports passing native instructions to LaTeX (tabularray) and HTML (bootstrap) formats.

Markdown limitations

Markdown is a text-only format that only supports these styles: italic, bold, strikeout. The width argument is also unavailable. These limitations exist because there is no standard markdown syntax for the other styling options.

However, in terminals (consoles) that support it, tinytable can display colors and text styles using ANSI escape codes by setting theme_markdown(ansi = TRUE). This allows for rich formatting in compatible terminal environments.

Word limitations

Word tables only support these styles: italic, bold, strikeout. The width argument is also unavailable. Moreover, the style_tt() function cannot be used to style headers inserted by the group_tt() function; instead, you should style the headers directly in the header definition using markdown syntax: group_tt(i = list("*italic header*" = 2)). These limitations are due to the fact that we create Word documents by converting a markdown table to .docx via the Pandoc software, which requires going through a text-only intermediate format.

Examples

if (FALSE) { # knitr::is_html_output()
}
if (knitr::is_html_output()) options(tinytable_print_output = "html")

library(tinytable)

tt(mtcars[1:5, 1:6])
#> 
#> +------+-----+------+-----+------+-------+
#> | mpg  | cyl | disp | hp  | drat | wt    |
#> +======+=====+======+=====+======+=======+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.620 |
#> +------+-----+------+-----+------+-------+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.875 |
#> +------+-----+------+-----+------+-------+
#> | 22.8 | 4   | 108  | 93  | 3.85 | 2.320 |
#> +------+-----+------+-----+------+-------+
#> | 21.4 | 6   | 258  | 110 | 3.08 | 3.215 |
#> +------+-----+------+-----+------+-------+
#> | 18.7 | 8   | 360  | 175 | 3.15 | 3.440 |
#> +------+-----+------+-----+------+-------+ 

# Alignment
tt(mtcars[1:5, 1:6]) |>
  style_tt(j = 1:5, align = "lcccr")
#> 
#> +------+-----+------+-----+------+-------+
#> | mpg  | cyl | disp | hp  | drat | wt    |
#> +======+=====+======+=====+======+=======+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.620 |
#> +------+-----+------+-----+------+-------+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.875 |
#> +------+-----+------+-----+------+-------+
#> | 22.8 | 4   | 108  | 93  | 3.85 | 2.320 |
#> +------+-----+------+-----+------+-------+
#> | 21.4 | 6   | 258  | 110 | 3.08 | 3.215 |
#> +------+-----+------+-----+------+-------+
#> | 18.7 | 8   | 360  | 175 | 3.15 | 3.440 |
#> +------+-----+------+-----+------+-------+ 

# Colors and styles
tt(mtcars[1:5, 1:6]) |>
  style_tt(i = 2:3, background = "black", color = "orange", bold = TRUE)
#> 
#> +----------+-------+---------+---------+----------+-----------+
#> | mpg      | cyl   | disp    | hp      | drat     | wt        |
#> +==========+=======+=========+=========+==========+===========+
#> | 21.0     | 6     | 160     | 110     | 3.90     | 2.620     |
#> +----------+-------+---------+---------+----------+-----------+
#> | **21.0** | **6** | **160** | **110** | **3.90** | **2.875** |
#> +----------+-------+---------+---------+----------+-----------+
#> | **22.8** | **4** | **108** | **93**  | **3.85** | **2.320** |
#> +----------+-------+---------+---------+----------+-----------+
#> | 21.4     | 6     | 258     | 110     | 3.08     | 3.215     |
#> +----------+-------+---------+---------+----------+-----------+
#> | 18.7     | 8     | 360     | 175     | 3.15     | 3.440     |
#> +----------+-------+---------+---------+----------+-----------+ 

# column selection with `j``
tt(mtcars[1:5, 1:6]) |>
  style_tt(j = 5:6, background = "pink")
#> 
#> +------+-----+------+-----+------+-------+
#> | mpg  | cyl | disp | hp  | drat | wt    |
#> +======+=====+======+=====+======+=======+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.620 |
#> +------+-----+------+-----+------+-------+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.875 |
#> +------+-----+------+-----+------+-------+
#> | 22.8 | 4   | 108  | 93  | 3.85 | 2.320 |
#> +------+-----+------+-----+------+-------+
#> | 21.4 | 6   | 258  | 110 | 3.08 | 3.215 |
#> +------+-----+------+-----+------+-------+
#> | 18.7 | 8   | 360  | 175 | 3.15 | 3.440 |
#> +------+-----+------+-----+------+-------+ 

tt(mtcars[1:5, 1:6]) |>
  style_tt(j = "drat|wt", background = "pink")
#> 
#> +------+-----+------+-----+------+-------+
#> | mpg  | cyl | disp | hp  | drat | wt    |
#> +======+=====+======+=====+======+=======+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.620 |
#> +------+-----+------+-----+------+-------+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.875 |
#> +------+-----+------+-----+------+-------+
#> | 22.8 | 4   | 108  | 93  | 3.85 | 2.320 |
#> +------+-----+------+-----+------+-------+
#> | 21.4 | 6   | 258  | 110 | 3.08 | 3.215 |
#> +------+-----+------+-----+------+-------+
#> | 18.7 | 8   | 360  | 175 | 3.15 | 3.440 |
#> +------+-----+------+-----+------+-------+ 

tt(mtcars[1:5, 1:6]) |>
  style_tt(j = c("drat", "wt"), background = "pink")
#> 
#> +------+-----+------+-----+------+-------+
#> | mpg  | cyl | disp | hp  | drat | wt    |
#> +======+=====+======+=====+======+=======+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.620 |
#> +------+-----+------+-----+------+-------+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.875 |
#> +------+-----+------+-----+------+-------+
#> | 22.8 | 4   | 108  | 93  | 3.85 | 2.320 |
#> +------+-----+------+-----+------+-------+
#> | 21.4 | 6   | 258  | 110 | 3.08 | 3.215 |
#> +------+-----+------+-----+------+-------+
#> | 18.7 | 8   | 360  | 175 | 3.15 | 3.440 |
#> +------+-----+------+-----+------+-------+ 

tt(mtcars[1:5, 1:6], theme = "empty") |>
  style_tt(
    i = 2, j = 2,
    colspan = 3,
    rowspan = 2,
    align = "c",
    alignv = "m",
    color = "white",
    background = "black",
    bold = TRUE)
#> 
#> +------+-----+------+-----+------+-------+
#> | mpg  | cyl | disp | hp  | drat | wt    |
#> +======+=====+======+=====+======+=======+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.620 |
#> +------+-----+------+-----+------+-------+
#> | 21.0 | **6**            | 3.90 | 2.875 |
#> +------+-----+------+-----+------+-------+
#> | 22.8 |     |      |     | 3.85 | 2.320 |
#> +------+-----+------+-----+------+-------+
#> | 21.4 | 6   | 258  | 110 | 3.08 | 3.215 |
#> +------+-----+------+-----+------+-------+
#> | 18.7 | 8   | 360  | 175 | 3.15 | 3.440 |
#> +------+-----+------+-----+------+-------+ 

tt(mtcars[1:5, 1:6], theme = "empty") |>
  style_tt(
    i = 0:3,
    j = 1:3,
    line = "tblr",
    line_width = 0.4,
    line_color = "teal")
#> 
#> +------+-----+------+-----+------+-------+
#> | mpg  | cyl | disp | hp  | drat | wt    |
#> +======+=====+======+=====+======+=======+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.620 |
#> +------+-----+------+-----+------+-------+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.875 |
#> +------+-----+------+-----+------+-------+
#> | 22.8 | 4   | 108  | 93  | 3.85 | 2.320 |
#> +------+-----+------+-----+------+-------+
#> | 21.4 | 6   | 258  | 110 | 3.08 | 3.215 |
#> +------+-----+------+-----+------+-------+
#> | 18.7 | 8   | 360  | 175 | 3.15 | 3.440 |
#> +------+-----+------+-----+------+-------+ 

tt(mtcars[1:5, 1:6], theme = "striped") |>
  style_tt(
    i = c(2, 5),
    j = 3,
    strikeout = TRUE,
    fontsize = 0.7)
#> 
#> +------+-----+---------+-----+------+-------+
#> | mpg  | cyl | disp    | hp  | drat | wt    |
#> +======+=====+=========+=====+======+=======+
#> | 21.0 | 6   | 160     | 110 | 3.90 | 2.620 |
#> +------+-----+---------+-----+------+-------+
#> | 21.0 | 6   | ~~160~~ | 110 | 3.90 | 2.875 |
#> +------+-----+---------+-----+------+-------+
#> | 22.8 | 4   | 108     | 93  | 3.85 | 2.320 |
#> +------+-----+---------+-----+------+-------+
#> | 21.4 | 6   | 258     | 110 | 3.08 | 3.215 |
#> +------+-----+---------+-----+------+-------+
#> | 18.7 | 8   | ~~360~~ | 175 | 3.15 | 3.440 |
#> +------+-----+---------+-----+------+-------+ 

# Non-standard evaluation (NSE)
dat <- data.frame(
  w = c(143002.2092, 201399.181, 100188.3883),
  x = c(1.43402, 201.399, 0.134588),
  y = as.Date(c(897, 232, 198), origin = "1970-01-01"),
  z = c(TRUE, TRUE, FALSE)
)
tt(dat) |>
  style_tt(i = w > 150000, j = c("w", "x"), 
           color = "white", background = "black")
#> 
#> +----------+------------+------------+-------+
#> | w        | x          | y          | z     |
#> +==========+============+============+=======+
#> | 143002.2 | 1.434020   | 1972-06-16 | TRUE  |
#> +----------+------------+------------+-------+
#> | 201399.2 | 201.399000 | 1970-08-21 | TRUE  |
#> +----------+------------+------------+-------+
#> | 100188.4 | 0.134588   | 1970-07-18 | FALSE |
#> +----------+------------+------------+-------+ 

tt(mtcars[1:5, 1:6]) |>
  theme_html(class = "table table-dark table-hover")
#> 
#> +------+-----+------+-----+------+-------+
#> | mpg  | cyl | disp | hp  | drat | wt    |
#> +======+=====+======+=====+======+=======+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.620 |
#> +------+-----+------+-----+------+-------+
#> | 21.0 | 6   | 160  | 110 | 3.90 | 2.875 |
#> +------+-----+------+-----+------+-------+
#> | 22.8 | 4   | 108  | 93  | 3.85 | 2.320 |
#> +------+-----+------+-----+------+-------+
#> | 21.4 | 6   | 258  | 110 | 3.08 | 3.215 |
#> +------+-----+------+-----+------+-------+
#> | 18.7 | 8   | 360  | 175 | 3.15 | 3.440 |
#> +------+-----+------+-----+------+-------+ 


inner <- "
column{1-4}={halign=c},
hlines = {fg=white},
vlines = {fg=white},
cell{1,6}{odd} = {bg=teal7},
cell{1,6}{even} = {bg=green7},
cell{2,4}{1,4} = {bg=red7},
cell{3,5}{1,4} = {bg=purple7},
cell{2}{2} = {r=4,c=2}{bg=azure7},
"
tt(mtcars[1:5, 1:4], theme = "empty") |>
  theme_latex(inner = inner)
#> 
#> +------+-----+------+-----+
#> | mpg  | cyl | disp | hp  |
#> +======+=====+======+=====+
#> | 21.0 | 6   | 160  | 110 |
#> +------+-----+------+-----+
#> | 21.0 | 6   | 160  | 110 |
#> +------+-----+------+-----+
#> | 22.8 | 4   | 108  | 93  |
#> +------+-----+------+-----+
#> | 21.4 | 6   | 258  | 110 |
#> +------+-----+------+-----+
#> | 18.7 | 8   | 360  | 175 |
#> +------+-----+------+-----+ 

# Style group rows and non-group rows
dat <- data.frame(x = 1:6, y = letters[1:6])
dat |>
  tt() |>
  group_tt(i = list("Group A" = 3)) |>
  style_tt(i = "groupi", background = "lightblue") |>
  style_tt(i = "~groupi", background = "lightgray")
#> 
#> +----+----+
#> | x  | y  |
#> +====+====+
#> | 1  | a  |
#> +----+----+
#> | 2  | b  |
#> +----+----+
#> | Group A |
#> +----+----+
#> | 3  | c  |
#> +----+----+
#> | 4  | d  |
#> +----+----+
#> | 5  | e  |
#> +----+----+
#> | 6  | f  |
#> +----+----+ 

# unquote expressions
dat <- mtcars[1:10,]
dat <- dat[order(dat$am),]
tt(dat) |>
   subset(mpg > 20) |>
   group_tt(am)
#> Warning: The `subset` argument of the `subset()` function is not supported for `tinytable` objects. Filter the rows before supplying the data frame to `tt()`.
#> 
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | mpg  | cyl | disp  | hp  | drat | wt    | qsec  | vs | am | gear | carb |
#> +======+=====+=======+=====+======+=======+=======+====+====+======+======+
#> | 0                                                                       |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 21.4 | 6   | 258.0 | 110 | 3.08 | 3.215 | 19.44 | 1  | 0  | 3    | 1    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 18.7 | 8   | 360.0 | 175 | 3.15 | 3.440 | 17.02 | 0  | 0  | 3    | 2    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 18.1 | 6   | 225.0 | 105 | 2.76 | 3.460 | 20.22 | 1  | 0  | 3    | 1    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 14.3 | 8   | 360.0 | 245 | 3.21 | 3.570 | 15.84 | 0  | 0  | 3    | 4    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 24.4 | 4   | 146.7 | 62  | 3.69 | 3.190 | 20.00 | 1  | 0  | 4    | 2    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 22.8 | 4   | 140.8 | 95  | 3.92 | 3.150 | 22.90 | 1  | 0  | 4    | 2    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 19.2 | 6   | 167.6 | 123 | 3.92 | 3.440 | 18.30 | 1  | 0  | 4    | 4    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 1                                                                       |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 21.0 | 6   | 160.0 | 110 | 3.90 | 2.620 | 16.46 | 0  | 1  | 4    | 4    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 21.0 | 6   | 160.0 | 110 | 3.90 | 2.875 | 17.02 | 0  | 1  | 4    | 4    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+
#> | 22.8 | 4   | 108.0 | 93  | 3.85 | 2.320 | 18.61 | 1  | 1  | 4    | 1    |
#> +------+-----+-------+-----+------+-------+-------+----+----+------+------+ 

# style elements: captions and colnames
notes <- list(
  "*" = "Hello world", 
  "a" = "Bacon ipsum dolor amet kevin t-bone porchetta.")
tt(head(iris), 
   width = .8,
   caption = "This is a Caption Example.", 
   notes = notes) |>
  style_tt(2, 2, background = "pink", rowspan = 2, colspan = 2, 
    alignv = "m", align = "c", line = "tblr") |>
  style_tt("colnames", italic = TRUE) |>
  style_tt("caption", smallcap = TRUE)
#> 
#> +----------------+---------------+----------------+---------------+-----------+
#> | _Sepal.Length_ | _Sepal.Width_ | _Petal.Length_ | _Petal.Width_ | _Species_ |
#> +================+===============+================+===============+===========+
#> | 5.1            | 3.5           | 1.4            | 0.2           | setosa    |
#> +----------------+---------------+----------------+---------------+-----------+
#> | 4.9            | 3.0                            | 0.2           | setosa    |
#> +----------------+---------------+----------------+---------------+-----------+
#> | 4.7            |               |                | 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    |
#> +================+===============+================+===============+===========+
#> | ^*^ Hello world                                                             |
#> +================+===============+================+===============+===========+
#> | ^a^ Bacon ipsum dolor amet kevin t-bone porchetta.                          |
#> +================+===============+================+===============+===========+
#> Table: THIS IS A CAPTION EXAMPLE.