我正在做网络抓取并将抓取的数据放在闪亮的应用程序中。 Web 抓取代码和数据在服务器外部(在全局环境中)。我将在 Shinyapps.io 中部署这个应用程序。我只想一天刷新一次数据,所以下次如果我在同一天打开应用程序,网页抓取应该不运行。数据应该每天只处理一次,应该只在第二天再次运行。我正在使用 invalidateLater()
,您认为这种方法是否正确,因为刷新应用程序会打开一个新会话?
server <- function(input, output) {
app_data <- reactive({
# invalidate 24 hrs later
invalidateLater(1000 * 60 * 60 * 24)
compute_data()
})
}