František Hána sinacek

sinacek / app.R

Created March 29, 2017 08:13

Shiny in docker - file permission problem in Rocker/shiny

	ui <- bootstrapPage(
	actionButton("createDir", "Create dir"),
	textOutput("info")
	)

	server <- function(input, output) {
	observeEvent(input$createDir, {
	dirPath <- paste0(round(as.numeric(Sys.time())))
	dir.create(dirPath)
	output$info <- renderPrint({