tabsetPanel_dsfr

tabsetPanel_dsfr

tabsetPanel_dsfr(id, ...)

tabPanel_dsfr(id, title, content)

Arguments

id

id du tabset/du tabPanel

...

liste de tabPanel_dsfr

title

titre du tabset

content

contenu du tabset

Valeur de retour

html

Examples

if (interactive()){
  library(shiny)
  shinyApp(
    ui = fluidPage_dsfr(
      tabsetPanel_dsfr(
        "coucou",
        tabPanel_dsfr(
          id = "tab1",
          title = "Une prems tab",
          content = tagList(
            h3("Coucou"),
            plotOutput("plot")
          )
        ),
        tabPanel_dsfr(
          id = "tab2",
          title = "Une deuxieme tab",
          content = tagList(
            h3("Salut"),
            plotOutput("plot2")
          )
        )
      )
    ),
    server = function(input, output) {
      output$plot <- renderPlot({
        plot(cars)
      })
      output$plot2 <- renderPlot({
        plot(iris)
      })
    }
  )
}