1

ドロップダウンには、サーバー ロジックで定義されたリストを使用する必要があります。

次のコードはアイデアを示しているはずです。

# server.R
shinyServer(function(input, output, session) {
    output$models <- c("a","b","c")
    ...
})


#ui.R
require(rCharts)
...
shinyUI(pageWithSidebar(
    ...
    sidebarPanel(
    selectInput("select", "Your choice:", [models]),
    ...
))

これを機能させることは可能ですか?renderText(models) に似たプレーン テキスト出力の可能性があります。

4

1 に答える 1