Button {shiny.blueprint} | R Documentation |
Button
Description
Documentation: https://blueprintjs.com/docs/#core/components/button
Usage
Button(...)
Button.shinyInput(inputId, ...)
AnchorButton(...)
AnchorButton.shinyInput(inputId, ...)
Arguments
... |
Component props and children. See the official Blueprint docs for details. |
inputId |
The |
Value
Object with shiny.tag
class suitable for use in the UI of a Shiny app.
Examples
library(shiny.blueprint)
library(shiny)
ui <- function(id) {
ns <- NS(id)
tagList(
textOutput(ns("clicks")),
Button(
onClick = triggerEvent(ns("click1")),
icon = "refresh",
"Refresh"
),
Button.shinyInput(
inputId = ns("click2"),
rightIcon = "share",
"Export"
),
AnchorButton(
onClick = triggerEvent(ns("click3")),
intent = "primary",
"OK"
),
AnchorButton.shinyInput(
inputId = ns("click4"),
intent = "success",
"Next"
)
)
}
server <- function(id) {
moduleServer(id, function(input, output, session) {
clicks <- reactiveVal(0)
output$clicks <- renderText(paste("Clicks:", clicks()))
observeEvent(input$click1, clicks(clicks() + 1))
observeEvent(input$click2, clicks(clicks() + 1))
observeEvent(input$click3, clicks(clicks() + 1))
observeEvent(input$click4, clicks(clicks() + 1))
})
}
if (interactive()) shinyApp(ui("app"), function(input, output) server("app"))
[Package shiny.blueprint version 0.3.0 Index]