tests/testthat/helper-render_formats.R

In gt: Easily Create Presentation-Ready Display Tables

# Testable version of the `render_formats()` function
render_formats_test <- function(data,
                                context) {
  build_data(data, context = context)$`_body`
}