Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ui <- fluidPage(
- switchInput(inputId = "somevalue", label = "Custom <br> <b> ICD10 </b>", value = FALSE,
- onLabel = "<strong>ON</strong>", offLabel = "<strong>OFF</strong>", size = "small"))
- server <- function(input, output, session) {}
- shinyApp(ui, server)
Add Comment
Please, Sign In to add comment