Optimize app for shiny proxy

Author: Francesco85P

Dockerfile

@@ -39,7 +39,8 @@ COPY inst/www /app/www
 COPY inst/hg38_Coordinates.rds /app
 COPY inst/hg37_Coordinates.rds /app
 COPY tools/ReViewCNV.R /app
-ENTRYPOINT ["Rscript", "ReViewCNV.R"]
+
+CMD R -e "shiny::runApp('/app', host='0.0.0.0', port=as.numeric(Sys.getenv('PORT')))"
 
 
 

tools/ReViewCNV.R

@@ -11,6 +11,7 @@ library(arrow)
 
 # Specify the application port
 
+
 port <- as.integer(Sys.getenv("SHINYPROXY_PORT", "6868"))
 options(shiny.port = port, shiny.host = "0.0.0.0")