mirror of
https://github.com/johrpan/ubigen.git
synced 2025-10-26 19:57:24 +01:00
20 lines
565 B
R
20 lines
565 B
R
#' Run the application server.
|
|
#'
|
|
#' @param host The hostname to serve the application on.
|
|
#' @param port The port to serve the application on.
|
|
#' @param custom_dataset This allows to set a custom dataset (return value of
|
|
#' [analyze()]) as the default dataset of the UI.
|
|
#'
|
|
#' @export
|
|
run_app <- function(host = "127.0.0.1",
|
|
port = 3464,
|
|
custom_dataset = NULL) {
|
|
runApp(
|
|
shinyApp(
|
|
ui(custom_dataset = custom_dataset),
|
|
server(custom_dataset = custom_dataset)
|
|
),
|
|
host = host,
|
|
port = port
|
|
)
|
|
}
|