| tablerCard | R Documentation | 
Build a tabler card
tablerCard(
  ...,
  title = NULL,
  options = NULL,
  footer = NULL,
  status = NULL,
  statusSide = c("top", "left"),
  collapsible = TRUE,
  collapsed = FALSE,
  closable = TRUE,
  zoomable = TRUE,
  width = 6,
  overflow = FALSE
)
| ... | Body content | 
| title | Card title. If NULL, the header is not displayed. | 
| options | Card extra header elements. | 
| footer | Card footer. NULL by default. Not displayed if NULL. | 
| status | Card status. NULL by default. See https://preview.tabler.io/docs/colors.html for valid statuses. | 
| statusSide | Status side: "top" or "left". | 
| collapsible | Whether the card is collapsible. TRUE by default. | 
| collapsed | Whether to collapse the card at start. FALSE by default. | 
| closable | Whether the card is closable. TRUE by default. | 
| zoomable | Whether the card is zoomable. TRUE by default. | 
| width | Card width. 6 by default. See Bootstrap grid system. If NULL, the card is full width. | 
| overflow | Whether to set up a x and y overflow. FALSE by default. Useful in case the card contains large tables. | 
David Granjon, dgranjon@ymail.com
if(interactive()){
 library(shiny)
 library(tablerDash)
 shiny::shinyApp(
   ui = tablerDashPage(
    navbar = NULL,
    footer = NULL,
    title = "test",
    body = tablerDashBody(
     tablerCard(
      title = "Card",
      sliderInput("obs", "Number of observations:",
      min = 0, max = 1000, value = 500
      ),
      plotOutput("distPlot"),
      status = "success",
      statusSide = "left"
     )
    )
   ),
   server = function(input, output) {
   output$distPlot <- renderPlot({
    hist(rnorm(input$obs))
   })
  }
 )
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.