光沢のあるダッシュボードをフレックスダッシュボードに移植しようとしていますが、サーバー側でレンダリングされるオブジェクトで問題が発生しています。
この例では、サーバー側でレンダリングされる入力セレクターがあります
output$weeklyWeekSelector <- renderUI({
selectInput('weeklyWeeks',
label = 'Uker',
choices = as.list(weeks),
multiple=TRUE,selectize=FALSE,
selected = weeks[1:26],
size=35)
})
ダッシュボードに表示されます。
uiOutput("weeklyWeekSelector")
これは、最初にページをロードするときにうまく機能しますが、次のようにするとうまくいきます。
次に、表示された入力セレクターがダッシュボードから完全に消えます。それだけでなく、Web サイトのそれ以降のすべてのインスタンスからも消えます (光沢のあるサーバー上にあります)。UI を再び表示するには、ダッシュボード/光沢のあるアプリを、shinyserver 内に再読み込みする必要があります (新しいファイルにコピーするだけです)。
この問題は、サーバー側で ggvis プロットをレンダリングして渡すときにも発生します。
両方を使用すると、この問題が発生します: 1. Shinyserver (dockerfile はこちら: https://github.com/raubreywhite/shiny )
.Rmd ファイルとデータをここに添付しました: https://github.com/rstudio/flexdashboard/issues/61
これがflexdashboardのバグなのか、それともflexdashboardとshinydashboardの考え方の違いを理解していないため、何か間違ったことをしているのかはわかりません。
ありがとう!
私はこれをさらに調べてきましたが、ページをまったくリロードするとこれが発生するようです。そのため、ウェブサイトがリロードされると、uiOutput が消えたように見えます。