Add host parameter

This commit is contained in:
Elias Projahn 2022-05-12 13:37:53 +02:00
parent 92b5e08dc1
commit 6aefa55eb9
2 changed files with 6 additions and 3 deletions

View file

@ -1,8 +1,9 @@
#' Run the application server.
#'
#' @param host The hostname to serve the application on.
#' @param port The port to serve the application on.
#'
#' @export
run_app <- function(port = 3464) {
runApp(shinyApp(ui, server), port = port)
run_app <- function(host = "127.0.0.1", port = 3464) {
runApp(shinyApp(ui, server), host = host, port = port)
}