write.csv разрешить блестящий сервер - R
Я не могу использовать write.csv на блестящем сервере. Я получаю эту ошибку:
cannot open file 'data/Available.csv': Permission denied
Я прочитал это (https://groups.google.com/forum/#!topic/shiny-discuss/srWETT6uL-I) и в результате попробовал это:
sudo chown shiny:shiny /path_to_app/data
Но все равно не повезло. Я использую следующую функцию из поста Дина Аттали (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")
)
}
В комбинации с:
observeEvent(input$swafer, {
saveData(values1$available)
})
... чтобы написать мой файл .csv. Возможно, мне нужно войти в систему как администратор на сервере, чтобы назначить разрешение (в настоящее время вы вошли как пользователь)? Или мойoutputDir
возможно, должно быть полное расширение?
РЕДАКТИРОВАТЬ
Кажется, если я изменюoutputDir
ни на что, кромеdata
оно работает. Похожеdata
это специальный подкаталог в году.