## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>")
set.seed(20260212)
library(GLBFP)
source(system.file("bench", "sim_scenarios.R", package = "GLBFP"))
source(system.file("bench", "run_validation.R", package = "GLBFP"))

## -----------------------------------------------------------------------------
result <- run_validation_suite(reps = 2, grid_size_1d = 60, grid_size_2d = 16)
summary_tbl <- summarise_validation(result)
summary_tbl

## -----------------------------------------------------------------------------
mi <- summary_tbl[order(summary_tbl$scenario, summary_tbl$ise_mean), ]
mi[, c("scenario", "dimension", "method", "ise_mean", "elapsed_mean")]

## -----------------------------------------------------------------------------
result$sensitivity

