как я могу получить доступ к file.info в r блестящий? - PullRequest
0 голосов
/ 20 апреля 2019

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()

}

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...