Probe one seasonal-adjustment case — probe_case • seasight

Convenience helper for reproducing a problematic single series. It writes an HTML report and returns the normalized output path invisibly.

Usage

probe_case(
  y,
  outfile = tempfile("seasight-probe-", fileext = ".html"),
  verbose = TRUE,
  report_fun = sa_report_html,
  ...
)

Arguments

y: Series to analyse.
outfile: Output HTML path. Defaults to a temporary file.
verbose: If TRUE, print the output path.
report_fun: Report function. Defaults to sa_report_html().
...: Additional arguments passed to report_fun.

Value

Invisibly, the normalized output path.

Examples

fake_report <- function(y, outfile, ...) {
  writeLines("<html><body>probe</body></html>", outfile)
  list(report = outfile)
}
probe_case(
  y = AirPassengers,
  outfile = tempfile("probe-", fileext = ".html"),
  verbose = FALSE,
  report_fun = fake_report
)