tabSetPill: Create a gentelella tabSetPill

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

Description

Create a gentelella tabSetPill

Usage

tabSetPill(..., right = FALSE)

Arguments

...	Slot for tabPill.
right	If TabSetPanel start from the right side. FALSE by default.

Author(s)

David Granjon, [e-mail]

Examples

if (interactive()) {
 library(shiny)
 library(gentelellaShiny)
 shinyApp(
  ui = gentelellaPageCustom(
   gentelellaBody(
    tabSetPill(
     tabPill(
       tabName = "Home",
       active = TRUE,
       "Raw denim you probably haven't heard of
       them jean shorts Austin. Nesciunt tofu stumptown
       aliqua, retro synth master cleanse. Mustache
       cliche tempor, williamsburg carles vegan helvetica.
       Reprehenderit butcher retro keffiyeh dreamcatcher synth.
       Cosby sweater eu banh mi, qui irure terr."
     ),
     tabPill(
       tabName = "Profile",
       active = FALSE,
       sliderInput(
         "obs",
         "Number of observations:",
         min = 0,
         max = 1000,
         value = 500
       ),
       plotOutput("distPlot")
     )
    )
   )
  ),
  server = function(input, output, session) {
   output$distPlot <- renderPlot({
    hist(rnorm(input$obs))
   })
  }
 )
}

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