boxWidget: A box widget container

In MarkEdmondson1234/gentelellaShiny: Use the Gentelella Bootstrap Template in Shiny Apps

Description

A box widget container

Usage

boxWidget(..., title = NULL, width = NULL)

Arguments

...	slot for any widget
title	widget title
width	widget width

Author(s)

David Granjon, [e-mail]

Examples

if (interactive()) {
 library(shiny)
 library(gentelellaShiny)
 shinyApp(
  ui = gentelellaPageCustom(
   gentelellaBody(
    box(
     width = 6,
     title = "Box Widget",
     fluidRow(
      column(
       width = 3,
       align = "center",
       sliderInput(
        "obs",
        "Number of observations:",
        min = 0,
        max = 1000,
        value = 500
       )
      ),
      column(
       width = 9,
       boxWidget(
        title = "Widget",
        plotOutput("distPlot")
       )
      )
     )
    )
   )
  ),
  server <- function(input, output) {
   output$distPlot <- renderPlot({
    hist(rnorm(input$obs))
   })
  }
 )
}

MarkEdmondson1234/gentelellaShiny documentation built on Dec. 31, 2019, 1:24 a.m.