У меня есть приложение R Shiny, использующее flexdashboard, которое я обновляю несколько раз в неделю на работе. Я запланировал его автоматическое обновление каждый будний день, и я подумал, что было бы неплохо добавить временную метку для того, когда он был повторно развернут. Здесь я сталкиваюсь с проблемами ...
Это код, который у меня есть в моем файле .Rmd:
date: 'Updated: `r format(as.POSIXct(format(Sys.time(), tz = "America/Denver")), "%b %d %I:%M %p")`'
Он выводит то, что я ожидал, что-то например, «09 марта, 4:00 вечера».
Однако, поскольку я использую Sys.time (), я понял, что моя блестящая панель мониторинга выводит только временную метку, когда панель мониторинга загружена, а не когда это было на самом деле обновлено. Я обнаружил ту же проблему при использовании аналогичных функций, таких как lubridate::now().
Можно ли каким-либо образом автоматизировать добавление временной отметки stati c в заголовок приложения R Shiny или заголовок flexdashboard во время развертывания?