ui <- bslib::page_fixed(
shiny::h1("A wonderful button"),
inline("To update, please feel free to press the ",
inline_button("mybutton",
label = shiny::span(style = "font-style:italic", "button"),
icon = shiny::icon("play"),
meaning = "Update button", accent = "success"),
"."
)
)
Run the code above in your browser using DataLab