#' @importFrom purrr flatten map
flatten_results <- function(sim) {
sim <- purrr::flatten(sim)
sim <- purrr::map(sim, ~ `[[`(., "results"))
purrr::flatten(sim)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.