#' @title Launch the shinyEffects Gallery
#'
#' @description
#' A gallery of all components available in shinyEffects.
#'
#' @export
#'
#' @examples
#'
#' if (interactive()) {
#'
#' shinyEffectsGallery()
#'
#' }
shinyEffectsGallery <- function() { # nocov start
if (!requireNamespace(package = "bs4Dash"))
message("Package 'bs4Dash' is required to run this function")
shiny::shinyAppFile(system.file('examples/app.R', package = 'shinyEffects', mustWork = TRUE))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.