update: script in order to have app working on shinyapps.io

.Rbuildignore

@@ -1,5 +1,10 @@
+^renv$
+^renv\.lock$
 ^LICENSE\.md$
 ^\.github$
 ^.*\.Rproj$
 ^\.Rproj\.user$
 ^build\.R
+^R/app\.R$
+^R/global\.R$
+

DESCRIPTION

@@ -24,7 +24,7 @@ Authors@R:
 Description: Provides a user-friendly R Shiny app for performing various statistical tests on datasets. 
   It allows users to upload data in numerous formats and perform statistical analyses. 
   The app dynamically adapts its options based on the selected columns and supports both single and multiple column comparisons.
-  The app's user interface (UI) is designed to streamline the process of selecting datasets, columns, and test options, 
+  The app's user interface is designed to streamline the process of selecting datasets, columns, and test options, 
   making it easy for users to explore and interpret their data. The underlying functions for statistical tests are well-organized and can be used independently within other R scripts.
 URL: https://github.com/vusaverse/vvdoctor,
     https://vusaverse.github.io/vvdoctor/

R/app.R

@@ -0,0 +1,18 @@
+# app.R
+
+# Load required packages
+library(shiny)
+
+# Source UI and server functions
+source("R/ui.R")
+source("R/global.R")
+source("R/server.R")
+# source("R/helperfunctions.R")
+
+# Define run_vvdoctor() function
+run_vvdoctor <- function() {
+  shiny::shinyApp(ui = app_ui, server = app_server)
+}
+
+# Run the app
+run_vvdoctor()