if (interactive()) {
# Preview a known slide deck name from a package:
show_slides(package = "rUM", deck = "rUM_the_package")
# Use find_slides to pipe the output:
find_slides(package = "rUM") |> show_slides()
}
Run the code above in your browser using DataLab