Create a rounded action button.

circleButton(inputId, icon = NULL, status = "default", size = "default", ...)

Arguments

inputId

The input slot that will be used to access the value.

icon

An icon to appear on the button.

status

Color of the button.

size

Size of the button : default, lg, sm, xs.

...

Named attributes to be applied to the button.

Examples

if (interactive()) { library(shiny) library(shinyWidgets) ui <- fluidPage( tags$h3("Rounded actionBution"), circleButton(inputId = "btn1", icon = icon("gear")), circleButton( inputId = "btn2", icon = icon("sliders"), status = "primary" ), verbatimTextOutput("res1"), verbatimTextOutput("res2") ) server <- function(input, output, session) { output$res1 <- renderPrint({ paste("value button 1:", input$btn1) }) output$res2 <- renderPrint({ paste("value button 2:", input$btn2) }) } shinyApp(ui, server) }