## ----setup, include = FALSE---------------------------------------------------
library(bslib)
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----waiter-code, eval=TRUE, echo=FALSE---------------------------------------
card(
  bs4Dash:::create_link_iframe(bs4Dash:::shinylive_links["inst/examples/vignettes-demos/preloader"]),
  full_screen = TRUE,
  style = "margin: 0 auto; float: none;"
)