forked from dreamRs/shinyWidgets
-
Notifications
You must be signed in to change notification settings - Fork 0
/
colorSelectorInput.Rd
95 lines (76 loc) · 2.12 KB
/
colorSelectorInput.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
88
89
90
91
92
93
94
95
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/input-colorselector.R
\name{colorSelectorInput}
\alias{colorSelectorInput}
\alias{colorSelectorExample}
\alias{colorSelectorDrop}
\title{Color Selector Input}
\usage{
colorSelectorInput(
inputId,
label,
choices,
selected = NULL,
mode = c("radio", "checkbox"),
display_label = FALSE,
ncol = 10
)
colorSelectorExample()
colorSelectorDrop(
inputId,
label,
choices,
selected = NULL,
display_label = FALSE,
ncol = 10,
circle = TRUE,
size = "sm",
up = FALSE,
width = NULL
)
}
\arguments{
\item{inputId}{The \code{input} slot that will be used to access the value.}
\item{label}{Display label for the control, or \code{NULL} for no label.}
\item{choices}{A list of colors, can be a list of named list, see example.}
\item{selected}{Default selected color, if \code{NULL} the first color for \code{mode = 'radio'}
and none for \code{mode = 'checkbox'}}
\item{mode}{\code{'radio'} for only one choice, \code{'checkbox'} for
selecting multiple values.}
\item{display_label}{Display list's names after palette of color.}
\item{ncol}{If choices is not a list but a vector, go to line after n elements.}
\item{circle}{Logical, use a circle or a square button}
\item{size}{Size of the button : default, lg, sm, xs.}
\item{up}{Logical. Display the dropdown menu above.}
\item{width}{Width of the dropdown menu content.}
}
\description{
Choose between a restrictive set of colors.
}
\section{Functions}{
\itemize{
\item \code{colorSelectorExample}: Examples of use for colorSelectorInput
\item \code{colorSelectorDrop}: Display a colorSelector in a dropdown button
}}
\examples{
if (interactive()) {
# Full example
colorSelectorExample()
# Simple example
ui <- fluidPage(
colorSelectorInput(
inputId = "mycolor1", label = "Pick a color :",
choices = c("steelblue", "cornflowerblue",
"firebrick", "palegoldenrod",
"forestgreen")
),
verbatimTextOutput("result1")
)
server <- function(input, output, session) {
output$result1 <- renderPrint({
input$mycolor1
})
}
shinyApp(ui = ui, server = server)
}
}