Perform targeted text transformation with a function

Perform targeted text transformation with a function

text_transform(data, locations, fn)

Arguments

data	A table object that is created using the gt() function.
locations	The cell or set of cells to be associated with the text transformation. Only the cells_body(), cells_stub(), and cells_column_labels() helper functions can be used here. We can enclose several of these calls within a list() if we wish to make the transformation happen at different locations.
fn	The function to use for text transformation.

Value

An object of class gt_tbl.

Figures

Function ID

3-12

See also

Other Format Data: data_color(), fmt_currency(), fmt_datetime(), fmt_date(), fmt_markdown(), fmt_missing(), fmt_number(), fmt_passthrough(), fmt_percent(), fmt_scientific(), fmt_time(), fmt()

Examples

# Use `exibble` to create a gt table;
# transform the formatted text in the
# `num` and `currency` columns using
# a function within `text_transform()`,
# where `x` is a formatted vector of
# column values
tab_1 <-
  exibble %>%
  dplyr::select(num, char, currency) %>%
  dplyr::slice(1:4) %>%
  gt() %>%
  fmt_number(columns = vars(num)) %>%
  fmt_currency(columns = vars(currency)) %>%
  text_transform(
    locations = cells_body(
      columns = vars(num)),
    fn = function(x) {
      paste0(
        x, " (",
        dplyr::case_when(
          x > 20   ~ "large",
          x <= 20  ~ "small"),
        ")")
    }
  )