如何解决如何在给定的时间而不是在计时器上更新无功函数？
每当系统中的分钟数是15的倍数时，我希望正在运行的闪亮应用程序在指定的时间更新数据（例如：12：00、12：15、12：30、12：45、13 ：00，13:15等）。我目前使用的反应式计时器每15分钟触发一次，但这并不能解决我的问题。如何仅在系统时间变为15的倍数时才更新应用程序？
解决方法
获取当前时间，确定直到下一次刷新的时间，然后适当地调用// User model
public function posts()
{
return $this->hasMany(Post::class);
}
。
例如，以下闪亮的应用程序每隔15秒刷新一次时钟：
invalidateLater() 编辑：
自上次编辑以来，我已略微简化了计算。 library(shiny)
ui <- fluidPage(
mainPanel(
textOutput('time')
)
)
server <- function(input,output) {
output$time <- renderText({
time <- as.integer(format(Sys.time(),"%S"))
invalidateLater((15 - time %% 15) * 1000)
format(Sys.time(),"%H:%M:%S")
})
}
shinyApp(ui = ui,server = server)
仅获得当前时间的第二部分。我们计算出MODULO 15（time <- as.integer(format(Sys.time(),"%S"))）的秒数，以获取最近15s倍后的秒数。然后，我们从15中减去该值以获得直到下一个倍数的秒数。由于时间必须以毫秒为单位，因此我们将结果乘以1000。
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
