Change the value of a PCR plate input control on the client

updatePcrPlateInput(
  session,
  inputId,
  label = NULL,
  selection = NULL,
  highlighting = NULL
)

Arguments

session	The `session` object passed to function given to `shinyServer`.
inputId	The id of the `input` object.
label	The label to set for the input object.
selection	The positions of the wells to be selected.
highlighting	The positions of the wells to be highlighted.

Examples

## Only run examples in interactive R sessions
library(RDML)
if (interactive()) {
ui <- fluidPage(
    pcrPlateInput("plate1",
                   "Plate 1",
                   RDML$new(system.file("/extdata/stepone_std.rdml", package = "RDML"))$AsTable(),
                  pcrFormatType$new(8,12,labelFormatType$new("ABC"),
                                         labelFormatType$new("123"))),
   verbatimTextOutput("selected"),
   actionButton("selectWellBtn",
                "Select Well A01-A03")
 )
 server <- function(input, output, session) {
   output$selected <- renderText({ input$plate1 })

   observeEvent(
               input$selectWellBtn,
               {
           updatePcrPlateInput(session,
           "plate1",
           selection = c("A01", "A02", "A03"))
  })
 }
 shinyApp(ui, server)
}