Parece que no puedo usar write.csv en el servidor brillante. Me sale este error:

cannot open file 'data/Available.csv': Permission denied

He leído estohttps://groups.google.com/forum/#!topic/shiny-discuss/srWETT6uL-I) y como resultado probé esto:

sudo chown shiny:shiny /path_to_app/data

Pero aún no hay suerte. Estoy usando la siguiente función de la publicación de Dean Attali (http://deanattali.com/blog/shiny-persistent-data-storage/):

outputDir <- "data"

saveData <- function(data) {
  # Write the file to the local system
  write.csv(
    x = data,
    file = file.path(outputDir, "Available.csv") 

  )
}

En combinación con:

observeEvent(input$swafer, {

    saveData(values1$available)

  })

... para escribir mi archivo .csv. ¿Quizás necesito iniciar sesión como administrador en el servidor para asignar el permiso (actualmente conectado como usuario)? O mioutputDir quizás tenga que ser la extensión completa?

EDITAR

Parece que si cambio eloutputDir a cualquier otra cosa que no seadata funciona. supongodata es un subdirectorio especial en shiny.