wired_icon_button: Wired Icon Button
In dreamRs/wired: Wired Elements in Shiny

Wired Icon Button

1	wired_icon_button(inputId, icon, ...)

`inputId`	The `input` slot that will be used to access the value. The `input` slot that will be used to access the value.
`icon`	An `shiny::icon` to appear on the button.
`...`	Named attributes to be applied to the button.

if (interactive()) {

  library(shiny)
  library(wired)

  ui <- fluidPage(
    wired_icon_button(
      inputId = "go",
      icon = icon("close")
    ),
    tags$br(),
    verbatimTextOutput(outputId = "res")
  )

  server <- function(input, output, session) {

    output$res <- renderPrint(input$go)

  }

  shinyApp(ui, server)

}