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.调整页面大小（使其重新加载）

然后我显示的输入选择器将完全从仪表板中消失。不仅如此，它还会从所有网站的其他实例中消失（我将它放在闪亮的服务器上）。然后需要在shinyserver（我只是复制新文件）中重新加载仪表板/闪亮应用程序，以便再次显示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
---

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

1 个答案: