R/flatten_results.R

Defines functions flatten_results

#' @importFrom purrr flatten map
flatten_results <- function(sim) {
  sim <- purrr::flatten(sim)
  sim <- purrr::map(sim, ~ `[[`(., "results"))
  purrr::flatten(sim)
}
MarselScheer/simTool documentation built on July 5, 2025, 7:30 a.m.