Export app_fn, server_fn, and ui_fn.

jonathan-g · Sep 4, 2024 · ce6b640 · ce6b640
1 parent 2cf6f11
commit ce6b640
Show file tree

Hide file tree

Showing 5 changed files with 11 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -1,5 +1,6 @@
 # Generated by roxygen2: do not edit by hand
 
+export(app_fn)
 export(classify_vars)
 export(count_unique)
 export(extract_last_tick)
@@ -17,8 +18,10 @@ export(load_bs_table)
 export(make_experiment)
 export(make_plot)
 export(process_bs_data)
+export(server_fn)
 export(tx_col)
 export(tx_name)
+export(ui_fn)
 import(dplyr)
 import(ggplot2)
 import(janitor)

diff --git a/R/app.R b/R/app.R
@@ -8,6 +8,9 @@
 #' @return A [`shinyApp`][shiny::shinyApp] object.
 #' @examples
 #' # ADD_EXAMPLES_HERE
+#'
+#' @export
+#'
 app_fn <- function(...) {
   shiny_file_size <- getOption("analyzeBehaviorspace.maxFileSize", default = 300)
   options(shiny.maxRequestSize = shiny_file_size * 1024^2)

diff --git a/R/server.R b/R/server.R
@@ -36,6 +36,8 @@ make_named_list <- function(x, as_list = TRUE) {
 #' shinyApp(ui, server)
 #' }
 #'
+#' @export
+#'
 server_fn <- function() {
   shiny::shinyServer(function(input, output, session) {
 

diff --git a/R/ui.R b/R/ui.R
@@ -29,6 +29,8 @@
 #' shinyApp(ui, server)
 #' }
 #'
+#' @export
+#'
 ui_fn <- function() {
   shiny::shinyUI(
     shiny::fluidPage(

diff --git a/man/app_fn.Rd b/man/app_fn.Rd