diff options
author | Naeem Model <me@nmode.ca> | 2023-06-24 23:45:07 +0000 |
---|---|---|
committer | Naeem Model <me@nmode.ca> | 2023-06-24 23:45:07 +0000 |
commit | 9a423db7a6499d587ec2d7f02accea5baf98a8e1 (patch) | |
tree | f1c97a84287ff8721889a6910b7a8d266450a407 | |
parent | 336017bd64d44f851b8c12d9f45359b5c2a6e2c3 (diff) |
Create entrypoint for shiny app
-rw-r--r-- | R/app.R | 13 |
1 files changed, 13 insertions, 0 deletions
@@ -0,0 +1,13 @@ +#' Launch the Rnaught Web Application +#' +#' @export +app <- function() { + if (!requireNamespace("shiny", quietly=TRUE)) + stop("The package 'shiny' must be installed to launch the Rnaught web application.") + if (!requireNamespace("shinyBS", quietly=TRUE)) + stop("The package 'shinyBS' must be installed to launch the Rnaught web application.") + if (!requireNamespace("shinyjs", quietly=TRUE)) + stop("The package 'shinyjs' must be installed to launch the Rnaught web application.") + + shiny::shinyApp(ui(), server) +} |