R/run_vvdoctor.R

In vvdoctor: Statistical Test App with R 'shiny'

#' Run the Statistical Test App
#'
#' This function starts the Shiny app, which allows users to upload data and perform
#' statistical tests on the dataset.
#' @return No return value, the function runs the Shiny app
#' @examples
#' if (interactive()) {
#'   run_vvdoctor()
#' }
#'
#' @export
#'
run_vvdoctor <- function() {
  shiny::shinyApp(ui = app_ui(), server = app_server)
}


#' Diagnose Data with Statistical Tests
#'
#' This function launches a Shiny application that allows users to upload data
#' and perform various statistical tests on the dataset. Users can select the
#' dependent and independent variables, choose the appropriate statistical test,
#' and view the results.
#' @examples
#' if (interactive()) {
#'   diagnose()
#' }
#'
#' @return NULL The function does not return a value, but launches the Shiny app.
#' @export
#'
diagnose <- function() {
  shiny::shinyApp(ui = app_ui(), server = app_server)
}