Create a Metro 4 charms toggle

Build a Metro charms toggle button

charmsToggle(..., id)

Arguments

...	Button text or icon.
id	Charms unique id. Needed by the charmsToggle.

Examples

if(interactive()){
 library(shiny)
 library(shinyMetroUi)

 shiny::shinyApp(
   ui = metroPage(
    fluidRow(
     charmsToggle(id = "mycharm", "Toggle charms")
    )
   ),
   server = function(input, output) {}
 )
}