file.info работает на локальном rstudio, но при развертывании на r блестящий он не работает. Кажется, информация о файле недоступна для блестящих? Есть ли другой способ записать дату создания файла в г блестящем.
Я загружаю файл .jpg (Фото) и хочу убедиться, что фотография не старая, поэтому я записываю cdate из file.info и сравниваю с sysdate. Он работает на локальной машине, но при развертывании на блестящей не работает. Это дает NA для всех деталей file.info.
2019-04-20T11: 48: 25.353489 + 00: 00 shinyapps [841678]: размер isdir mode mtime ctime atime uid gid uname grname
2019-04-20T11: 48: 25.353545 + 00: 00 shinyapps [841678]: IMG-20190306-WA0042.jpg NA NA NA NA
2019-04-20T11: 48: 25.354488 + 00:00 shinyapps [841678]: [1] «2019-04-20»
2019-04-20T11: 48: 25.355589 + 00: 00 shinyapps [841678]: Предупреждение: ошибка в случае: пропущено значение, где требуется ИСТИНА / ЛОЖЬ
2019-04-20T11: 48: 25.360865 + 00: 00 shinyapps [841678]: 84: наблюдать
наблюдать за событием (введите $ myFile, {
#df [nrow (intime) +1,] <- NA </p>
mfile <- input$myFile
#print(mfile$name)
upload<- file.info(mfile$name)
print(upload)
filedate<- as.POSIXlt(upload$ctime, tz = "Asia/Kolkata")
filedate<- as.Date(filedate)
print(Sys.Date())
if (filedate !=Sys.Date()) {
shinyalert(
title = "Old Picture",
text = "Please upload today's picture",
closeOnEsc = TRUE,
closeOnClickOutside = FALSE,
html = FALSE,
type = "error",
showConfirmButton = TRUE,
showCancelButton = FALSE,
confirmButtonText = "OK",
confirmButtonCol = "#AEDEF4",
timer = 0,
imageUrl = "",
animation = TRUE)
return()
}