tests/testthat/helper-options.R

rq <- function(...) {
  suppressPackageStartupMessages(require(..., quietly = TRUE))
}

with_options <- function(opts, expr) {
  old_opts <- options(opts)
  on.exit(options(old_opts))
  force(expr)
}
ggobi/ggally documentation built on June 12, 2025, 8:44 p.m.