You can not select more than 25 topics
			Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
		
		
		
		
			
				
					29 lines
				
				623 B
			
		
		
			
		
	
	
					29 lines
				
				623 B
			| 
											4 years ago
										 | #' Run the Shiny Application | ||
|  | #' | ||
|  | #' @param ... arguments to pass to golem_opts.  | ||
|  | #' See `?golem::get_golem_options` for more details. | ||
|  | #' @inheritParams shiny::shinyApp | ||
|  | #' | ||
|  | #' @export | ||
|  | #' @importFrom shiny shinyApp | ||
|  | #' @importFrom golem with_golem_options  | ||
|  | run_app <- function( | ||
|  |   onStart = NULL, | ||
|  |   options = list(),  | ||
|  |   enableBookmarking = NULL, | ||
|  |   uiPattern = "/", | ||
|  |   ... | ||
|  | ) { | ||
|  |   with_golem_options( | ||
|  |     app = shinyApp( | ||
|  |       ui = app_ui, | ||
|  |       server = app_server, | ||
|  |       onStart = onStart, | ||
|  |       options = options,  | ||
|  |       enableBookmarking = enableBookmarking,  | ||
|  |       uiPattern = uiPattern | ||
|  |     ),  | ||
|  |     golem_opts = list(...) | ||
|  |   ) | ||
|  | } |