Run eyeris commands with automatic logging of R console's stdout and stderr

This utility function evaluates eyeris commands while automatically capturing and recording both standard output (stdout) and standard error (stderr) to timestamped log files in your desired log directory.

Usage

eyelogger(
  eyeris_cmd,
  log_dir = file.path(tempdir(), "eyeris_logs"),
  timestamp_format = "%Y%m%d_%H%M%S"
)

Arguments

eyeris_cmd: An eyeris command, wrapped in {} if multiline
log_dir: Character path to the desired log directory. Is set to the temporary directory given by tempdir() by default
timestamp_format: Format string passed to format(Sys.time()) for naming the log files. Defaults to "%Y%m%d_%H%M%S"

Value

The result of the evaluated eyeris command (invisibly)

Details

Each run produces two log files:

<timestamp>.out: records all console output
<timestamp>.err: records all warnings and errors

Examples

eyelogger({
  message("eyeris `glassbox()` completed successfully.")
  warning("eyeris `glassbox()` completed with warnings.")
  print("some eyeris-related information.")
})
#> eyeris `glassbox()` completed successfully.
#> Warning: eyeris `glassbox()` completed with warnings.

eyelogger({
  glassbox(eyelink_asc_demo_dataset(), interactive_preview = FALSE)
}, log_dir = file.path(tempdir(), "eyeris_logs"))
#> ✔ [2026-07-19 07:15:17] [OKAY] Running eyeris::load_asc()
#> ✔ [2026-07-19 07:15:17] [OKAY] Running eyeris::resample()
#> ℹ [2026-07-19 07:15:17] [INFO] Processing block: block_1
#> ✔ [2026-07-19 07:15:17] [OKAY] Running eyeris::deblink() for block_1
#> ✔ [2026-07-19 07:15:17] [OKAY] Running eyeris::detransient() for block_1
#> ✔ [2026-07-19 07:15:17] [OKAY] Running eyeris::interpolate() for block_1
#> ! [2026-07-19 07:15:17] [WARN] Interpolation now leaves gaps longer than 250 ms
#> as `NA` instead of interpolating across them (following Kret & Sjak-Shie,
#> 2018). This is a change in default behavior from eyeris <= 3.2.0 and may affect
#> your results. To restore the previous behavior, set `interpolate =
#> list(max_gap_ms = Inf)` in `glassbox()` (or `max_gap_ms = Inf` in
#> `interpolate()`).
#> ✔ [2026-07-19 07:15:17] [OKAY] Running eyeris::lpfilt() for block_1

#> ! [2026-07-19 07:15:17] [WARN] Skipping eyeris::downsample() for block_1
#> ! [2026-07-19 07:15:17] [WARN] Skipping eyeris::bin() for block_1
#> ! [2026-07-19 07:15:17] [WARN] Skipping eyeris::detrend() for block_1
#> ✔ [2026-07-19 07:15:17] [OKAY] Running eyeris::zscore() for block_1
#> ℹ [2026-07-19 07:15:17] [INFO] Block processing summary:
#> ℹ [2026-07-19 07:15:17] [INFO] block_1: OK (steps: 6, latest:
#> pupil_raw_deblink_detransient_interpolate_lpfilt_z)
#> ✔ [2026-07-19 07:15:17] [OKAY] Running eyeris::summarize_confounds()