Description Usage Arguments Examples
Allow to apply a blur effect on a given element.
1 | setBlur(intensity = 2)
|
intensity |
Blur intensity. |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | if (interactive()) {
library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
library(shinyEffects)
boxTag <- box(
title = "A box",
status = "warning",
solidHeader = FALSE,
collapsible = TRUE,
p("Box Content")
)
shinyApp(
ui = dashboardPage(
header = dashboardHeader(),
sidebar = dashboardSidebar(),
body = dashboardBody(
setBlur(),
fluidRow(blurContainer(boxTag), boxTag)
),
controlbar = dashboardControlbar(),
title = "DashboardPage"
),
server = function(input, output) { }
)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.