Guest User

Untitled

a guest
Jun 25th, 2018
66
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.27 KB | None | 0 0
  1. ui <- fluidPage(
  2. switchInput(inputId = "somevalue", label = "Custom <br> <b> ICD10 </b>", value = FALSE,
  3. onLabel = "<strong>ON</strong>", offLabel = "<strong>OFF</strong>", size = "small"))
  4.  
  5.  
  6. server <- function(input, output, session) {}
  7.  
  8. shinyApp(ui, server)
Add Comment
Please, Sign In to add comment