more

Dockerfile

@@ -2,6 +2,8 @@
 
 FROM rocker/shiny
 
+RUN useradd -m -u 1000 shiny
+
 RUN apt-get update && apt-get install -y \
     --no-install-recommends \
     git-core \
@@ -16,6 +18,8 @@ RUN apt-get update && apt-get install -y \
 
 ENV _R_SHLIB_STRIP_=true
 
+COPY ./app/* /srv/shiny-server/
+
 RUN install2.r --error --skipinstalled \
     shiny \
     forecast \

app.R

@@ -0,0 +1,10 @@
+library(shiny)
+
+ui <- fluidPage(
+  titlePanel("Example Shiny Application")
+)
+
+server <- function(input, output) {
+}
+
+shinyApp(ui = ui, server = server)