forked from dreamRs/shinyWidgets
-
Notifications
You must be signed in to change notification settings - Fork 0
/
vertical-tab.Rd
87 lines (70 loc) · 2.08 KB
/
vertical-tab.Rd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/vertical-tab.R
\name{vertical-tab}
\alias{vertical-tab}
\alias{verticalTabsetPanel}
\alias{verticalTabPanel}
\title{Vertical tab panel}
\usage{
verticalTabsetPanel(
...,
selected = NULL,
id = NULL,
color = "#112446",
contentWidth = 9,
menuSide = "left"
)
verticalTabPanel(title, ..., value = title, icon = NULL, box_height = "160px")
}
\arguments{
\item{...}{For \code{verticalTabsetPanel}, \code{verticalTabPanel}
to include, and for the later, UI elements.}
\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{id}{If provided, you can use \code{input$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{verticalTabPanel}.}
\item{color}{Color for the tab panels.}
\item{contentWidth}{Width of the content panel (must be between 1 and 12), menu width will be \code{12 - contentWidth}.}
\item{menuSide}{Side for the menu: right or left.}
\item{title}{Display title for tab.}
\item{value}{Not used yet.}
\item{icon}{Optional icon to appear on the tab.}
\item{box_height}{Height for the title box.}
}
\description{
Vertical tab panel
}
\examples{
if (interactive()) {
library(shiny)
library(shinyWidgets)
ui <- fluidPage(
fluidRow(
column(
width = 10, offset = 1,
tags$h2("Vertical tab panel example"),
verticalTabsetPanel(
verticalTabPanel(
title = "Title 1", icon = icon("home", "fa-2x"),
"Content panel 1"
),
verticalTabPanel(
title = "Title 2", icon = icon("map", "fa-2x"),
"Content panel 2"
),
verticalTabPanel(
title = "Title 3", icon = icon("rocket", "fa-2x"),
"Content panel 3"
)
)
)
)
)
server <- function(input, output, session) {
}
shinyApp(ui, server)
}
}
\seealso{
\code{\link{updateVerticalTabsetPanel}} for updating selected tabs.
}