是否有一个R函数来实时更新我的Flexdashboard。也就是说，我不应该每天运行我的Rmd代码

library(shiny)

# 创建一个响应式对象
data <- reactive({
  # 在这里放置需要实时更新的代码
  # 每当依赖关系发生变化时，该代码块将重新运行
  # 并更新data对象的值
  # 例如，您可以在这里获取最新的数据或计算结果
})

# 在Flexdashboard中使用data对象
---
title: "My Flexdashboard"
output: flexdashboard::flex_dashboard
---

```{r}
# 在这里使用data对象
# 每当data对象的值发生变化时，该代码块将重新运行
# 并更新Flexdashboard中的内容