Creates a JSColor (Javascript/HTML Color Picker) widget to be used in shiny applications.
jscolorInput(
inputId,
label,
value,
position = "bottom",
color = "transparent",
mode = "HSV",
slider = TRUE,
close = FALSE
)character (required): Specifies the input slot that will be used to access the value.
character (optional): Display label for the control, or NULL for no label.
character (optional): Initial RGB value of the color picker. Default is black ('#000000').
character (with default): Position of the picker relative to the text input ('bottom', 'left', 'top', 'right').
character (with default): Picker color scheme ('transparent' by default). Use RGB color coding ('000000').
character (with default): Mode of hue, saturation and value. Can either be 'HSV' or 'HVS'.
logical (with default): Show or hide the slider.
logical (with default): Show or hide a close button.
Other input.elements: shiny::animationOptions, shiny::sliderInput; shiny::checkboxGroupInput; shiny::checkboxInput; shiny::dateInput; shiny::dateRangeInput; shiny::fileInput; shiny::numericInput; shiny::passwordInput; shiny::radioButtons; shiny::selectInput, shiny::selectizeInput; shiny::submitButton; shiny::textInput
# html code
jscolorInput("col", "Color", "21BF6B", slider = FALSE)
#> <p>Color</p>
#> <input id="col" value="21BF6B" class="color {hash:true, pickerPosition:'bottom', pickerBorderColor:'transparent', pickerFaceColor:'transparent', pickerMode:'HSV', slider:false, pickerClosable:false}" onchange="$('#col').trigger('afterChange')"/>
#> <script>$('#col').trigger('afterChange')</script>
# example app
if (FALSE) { # \dontrun{
shinyApp(
ui = fluidPage(
jscolorInput(inputId = "col", label = "JSColor Picker",
value = "21BF6B", position = "right",
mode = "HVS", close = TRUE),
plotOutput("plot")
),
server = function(input, output) {
output$plot <- renderPlot({
plot(cars, col = input$col, cex = 2, pch = 16)
})
})
} # }