@@ -2,7 +2,7 @@ igsva <- function() {

   shinydeps <- c("shiny", "shinythemes", "ggplot2",

                  "data.table", "plotly", "future",

-                 "shinyjs", "shinybusy")

+                 "shinyjs", "shinybusy", "limma")

   maskshinydeps <- shinydeps %in% installed.packages()

   if (any(!maskshinydeps))

     stop(sprintf("Please install the following packages to use the GSVA WebApp:\n\n  %s\n",

@@ -20,22 +20,24 @@ igsva <- function() {

                       vars="ggplot")

   namespaceImportFrom(self=getNamespace("base"),

-                      ns=getNamespace("data.table"),

-                      vars="as.data.table")

+                      ns=getNamespace("data.table"))

   namespaceImportFrom(self=getNamespace("base"),

                       ns=getNamespace("plotly"),

                       vars=c("ggplotly", "event_data", "style"))

-  

+

   namespaceImportFrom(self=getNamespace("base"),

                       ns=getNamespace("future"))

-  

+

   namespaceImportFrom(self=getNamespace("base"),

                       ns=getNamespace("shinyjs"))

-  

+

   namespaceImportFrom(self=getNamespace("base"),

                       ns=getNamespace("shinybusy"))

+  namespaceImportFrom(self=getNamespace("base"),

+                      ns=getNamespace("limma"))

+

   appDir <- system.file("shinyApp", package="GSVA")

   if (appDir == "")

     stop("The GSVA Shiny app cannot be found within the package.")

new file mode 100644

@@ -0,0 +1,13 @@

+name: shinyApp

+title: shinyApp

+username:

+account: prodriguez-bio2

+server: shinyapps.io

+hostUrl: https://api.shinyapps.io/v1

+appId: 3971711

+bundleId: 4476074

+url: https://prodriguez-bio2.shinyapps.io/shinyapp/

+when: 1618503477.40691

+lastSyncTime: 1618503477.40694

+asMultiple: FALSE

+asStatic: FALSE