闪亮的 flexdashboard 中的反应式 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 个其他实例中消失（我把它放在闪亮的服务器上）。然后 dashboard/shiny 应用程序需要在 shinyserver 中重新加载（我只是复制新文件）以便 UI 再次出现。

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

当我同时使用两者时会出现此问题： 1. Shinyserver（此处为 dockerfile：https://github.com/raubreywhite/shiny） 2. rmarkdown::run 在 RStudio

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

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

谢谢！

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

Answer 1

我想通了。 .rmd 文件开头是我的 YAML。

Old/wrong YAML:

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

New/correct YAML:

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

闪亮的 flexdashboard 中的反应式 uiOutput - 杀死整个仪表板？

Reactive uiOutput in shiny flexdashboard -- kills entire dashboard?

shiny-server

shiny

shinydashboard

flexdashboard