mirror of
https://github.com/rstudio/shiny.git
synced 2026-01-13 08:57:57 -05:00
2360bde13e
* Remove deprecated reactive* functions * Remove deprecated code * Update NEWS * Remove extractStackTrace and formatStackTrace * remove responsive from bootstrapPage() wrappers * Move extractStackTrace() to tests so they pass * Don't force suggested pkgs in devel on GHA Co-authored-by: Carson <cpsievert1@gmail.com>
93 lines
2.7 KiB
R
93 lines
2.7 KiB
R
% Generated by roxygen2: do not edit by hand
|
|
% Please edit documentation in R/bootstrap.R
|
|
\name{tabsetPanel}
|
|
\alias{tabsetPanel}
|
|
\title{Create a tabset panel}
|
|
\usage{
|
|
tabsetPanel(
|
|
...,
|
|
id = NULL,
|
|
selected = NULL,
|
|
type = c("tabs", "pills", "hidden"),
|
|
header = NULL,
|
|
footer = NULL
|
|
)
|
|
}
|
|
\arguments{
|
|
\item{...}{\code{\link[=tabPanel]{tabPanel()}} elements to include in the tabset}
|
|
|
|
\item{id}{If provided, you can use \verb{input$}\emph{\code{id}} in your
|
|
server logic to determine which of the current tabs is active. The value
|
|
will correspond to the \code{value} argument that is passed to
|
|
\code{\link[=tabPanel]{tabPanel()}}.}
|
|
|
|
\item{selected}{The \code{value} (or, if none was supplied, the \code{title})
|
|
of the tab that should be selected by default. If \code{NULL}, the first
|
|
tab will be selected.}
|
|
|
|
\item{type}{\describe{
|
|
\item{\code{"tabs"}}{Standard tab look}
|
|
\item{\code{"pills"}}{Selected tabs use the background fill color}
|
|
\item{\code{"hidden"}}{Hides the selectable tabs. Use \code{type = "hidden"} in
|
|
conjunction with \code{\link[=tabPanelBody]{tabPanelBody()}} and \code{\link[=updateTabsetPanel]{updateTabsetPanel()}} to control the
|
|
active tab via other input controls. (See example below)}
|
|
}}
|
|
|
|
\item{header}{Tag or list of tags to display as a common header above all
|
|
tabPanels.}
|
|
|
|
\item{footer}{Tag or list of tags to display as a common footer below all
|
|
tabPanels}
|
|
}
|
|
\value{
|
|
A tabset that can be passed to \code{\link[=mainPanel]{mainPanel()}}
|
|
}
|
|
\description{
|
|
Create a tabset that contains \code{\link[=tabPanel]{tabPanel()}} elements. Tabsets are
|
|
useful for dividing output into multiple independently viewable sections.
|
|
}
|
|
\examples{
|
|
# Show a tabset that includes a plot, summary, and
|
|
# table view of the generated distribution
|
|
mainPanel(
|
|
tabsetPanel(
|
|
tabPanel("Plot", plotOutput("plot")),
|
|
tabPanel("Summary", verbatimTextOutput("summary")),
|
|
tabPanel("Table", tableOutput("table"))
|
|
)
|
|
)
|
|
|
|
ui <- fluidPage(
|
|
sidebarLayout(
|
|
sidebarPanel(
|
|
radioButtons("controller", "Controller", 1:3, 1)
|
|
),
|
|
mainPanel(
|
|
tabsetPanel(
|
|
id = "hidden_tabs",
|
|
# Hide the tab values.
|
|
# Can only switch tabs by using `updateTabsetPanel()`
|
|
type = "hidden",
|
|
tabPanelBody("panel1", "Panel 1 content"),
|
|
tabPanelBody("panel2", "Panel 2 content"),
|
|
tabPanelBody("panel3", "Panel 3 content")
|
|
)
|
|
)
|
|
)
|
|
)
|
|
|
|
server <- function(input, output, session) {
|
|
observeEvent(input$controller, {
|
|
updateTabsetPanel(session, "hidden_tabs", selected = paste0("panel", input$controller))
|
|
})
|
|
}
|
|
|
|
if (interactive()) {
|
|
shinyApp(ui, server)
|
|
}
|
|
}
|
|
\seealso{
|
|
\code{\link[=tabPanel]{tabPanel()}}, \code{\link[=updateTabsetPanel]{updateTabsetPanel()}},
|
|
\code{\link[=insertTab]{insertTab()}}, \code{\link[=showTab]{showTab()}}
|
|
}
|