inst/examples/server.R

shinyServer(function(input, output, session) {
  shinyFunctions <- createRFDrawer(
    colors = c("green", "yellow", "red"),
    shapes = rep("triangle", 3)
  )

  output$rfDrawer <- renderUI({
    shinyFunctions$UI("rf")
  })

  callModule(shinyFunctions$Server, id = "rf")
})
burjandedes/randomForestDrawer documentation built on Aug. 4, 2017, 12:09 a.m.