shiny-server - Shiny 的 flexdashboard 中的响应式(Reactive) uiOutput - 杀死整个仪表板？

Question

我正在尝试将我的 shinydashboards 移植到 flexdashboard，但我遇到了在服务器端呈现的对象的问题。

在这个例子中，我有一个在服务器端呈现的输入选择器

output$weeklyWeekSelector <- renderUI({
    selectInput('weeklyWeeks',
                label = 'Uker',
                choices = as.list(weeks),
                multiple=TRUE,selectize=FALSE,
                selected = weeks[1:26],
                size=35)
  })

然后显示在仪表盘上:

uiOutput("weeklyWeekSelector")

这在我第一次加载页面时效果很好，但是，如果我执行以下操作:1.加载页面(工作正常!)2.调整页面大小(使其重新加载)

然后我显示的输入选择器将从仪表板中完全消失。不仅如此，它还会从 ALL 网站的其他实例中消失(我把它放在 Shiny 的服务器上)。然后需要在 shinyserver 中重新加载仪表板/ Shiny 应用程序(我只是复制新文件)以便 UI 再次出现。

当我在服务器端渲染 ggvis 图并通过它时，也会出现此问题。

当我同时使用两者时会出现此问题:1. Shinyserver(此处为 dockerfile:https://github.com/raubreywhite/shiny)2. rmarkdown::在 RStudio 上运行

我在此处附上了 .Rmd 文件和数据:https://github.com/rstudio/flexdashboard/issues/61

我不知道这是 flexdashboard 的错误还是我做错了什么，因为我不了解 flexdashboard 和 shinydashboard 之间的不同思维方式。

谢谢!

---

我一直在研究这个问题，而且似乎如果我重新加载页面也会发生这种情况。所以 uiOutput 似乎在网站重新加载后消失了。

Answer 1

我发现了问题。 .rmd 文件开头是我的 YAML。

旧的/错误的 YAML:

---
title: "NorMOMO"
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
    vertical_layout: fill
---

新的/正确的 YAML:

---
title: "NorMOMO"
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
    vertical_layout: fill
runtime: shiny
---